Selamlar arkadaşlar;
Birçok excel sayfam var. Bu sayfaların adlarını kişi isimlerine göre düzenledim (öyle olması gerekiyor). A isimli sayfamda ise isim listesi bulunmakta. Tek bir buton ile isim listesindeki isimlere ait sayfalarda bulunan örneğin [az12] hücresinden verileri alıp A isimli sayfadaki isimlerin karşısına yazmak istiyorum. Bu konuda yardımcı olabilir misiniz?
Birden fazla sayfadan isme göre veri almak.
-
- Mesajlar: 3
- Kayıt: 10 Oca 2024, 10:26
- Adınız: Cemalettin
- Soyadınız: Şirinoğlu
-
- Mesajlar: 26
- Kayıt: 01 Ağu 2023, 14:07
- Meslek: Muhasebeci
- Adınız: tarık
- Soyadınız: sadık
Re: Birden fazla sayfadan isme göre veri almak.
Örnek bir dosya ekleyin , yardımcı oluruz.
-
- Mesajlar: 3
- Kayıt: 10 Oca 2024, 10:26
- Adınız: Cemalettin
- Soyadınız: Şirinoğlu
Re: Birden fazla sayfadan isme göre veri almak.
yolluk userformundaki 3aylık yazdır butonu ile 3Aylık olarak belirtilen sayfaya isimlerin karşısına yazdırmak istiyorum.
Bu mesaja eklenen dosyaları görüntülemek için gerekli izinlere sahip değilsiniz.
-
- Mesajlar: 26
- Kayıt: 01 Ağu 2023, 14:07
- Meslek: Muhasebeci
- Adınız: tarık
- Soyadınız: sadık
Re: Birden fazla sayfadan isme göre veri almak.
Kodları deneyin.
Kod: Tümünü seç
sub veriAL()
Dim i As Long
Dim x As Long
For x = 10 To Sheets("3aylık").Cells(Rows.Count, 2).End(3).Row
For i = 1 To Sheets.Count
If Sheets(i).Name = Sheets("3aylık").Cells(x, 2) Then
Sheets("3aylık").Cells(x, 7) = Sheets(i).Range("az12")
End If
Next
Next
end sub
-
- Mesajlar: 3
- Kayıt: 10 Oca 2024, 10:26
- Adınız: Cemalettin
- Soyadınız: Şirinoğlu
Re: Birden fazla sayfadan isme göre veri almak.
Sorunum çözüldü çok teşekkür ederim. Anlaşılan öğreneceğimiz çok şeyler var.