Üstadlar benim bir derdim var. Formlarda gördüğüm kadarıyla yardımsever ve bilgili pek çok arkadaşımız var burada, banada bir yardım eden olursa sevinirim. Sıkıntım şu; Ekte gönderdiğim tabloda 2 tane sheet var. şimdi ben öylebirşey istiyorumki DEÃİÃKEN deki A sütununda bulunan tüm satırların karşılıklarını (PERSONEL ADI) LİSTE den alsın. Bilmiyorum çok şeymi istedim. Görünüşte hiçbir anlamı yokmuş gibi ama inanın öyle değil. Bu değişken sheet i hergün yenileniyor.
-
DİKKAT DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
Altın Üyelik Hakkında Bilgi
Sırayla Karşılaştırıp Veri Alma
- Konbuyu başlatan letal
- Başlangıç tarihi
veyselemre
Özel Üye
- Katılım
- 9 Mart 2005
- Mesajlar
- 3,646
- Excel Vers. ve Dili
- Pro Plus 2021
[vb:1:d277becf8e]Sub aktar()
On Error Resume Next
Sheets("değişken").Select
Set s2 = Sheets("liste")
For x = 2 To [a65536].End(3).Row
a = s2.Columns(1).Find(Cells(x, 1)).Row
If a > 0 Then Cells(x, 2) = s2.Cells(a, 2)
Next
End Sub[/vb:1:d277becf8e]
On Error Resume Next
Sheets("değişken").Select
Set s2 = Sheets("liste")
For x = 2 To [a65536].End(3).Row
a = s2.Columns(1).Find(Cells(x, 1)).Row
If a > 0 Then Cells(x, 2) = s2.Cells(a, 2)
Next
End Sub[/vb:1:d277becf8e]