Çözüldü Başka sayfadan filtrelenmiş sütunda ilk dolu hücreyi yazdırma

[mert25]

Merhabalar,

Ekteki dosyada Ana Sayfadaki D2 ve E2 hücrelerine "Basketbol" adlı sayfada D ve E sütunlarındaki takımları filtreleyince ilk dolu hücreler yazılsın istiyorum.

Ayrıca bu isteğim vba kodu ile otomatik olarak yapılır mı? Yani Basketbol sayfasında filtreleme yapınca D ve E hücrelerindeki takım isimleri Ana Sayfaya geçtiğimde D ve E hücrelerine otomatik gelsin.

Yardımcı olacak ustalara şimdiden teşekkür ederim.

 

[murat_8181]

Merhabalar,

Ekteki dosyada Ana Sayfadaki D2 ve E2 hücrelerine "Basketbol" adlı sayfada D ve E sütunlarındaki takımları filtreleyince ilk dolu hücreler yazılsın istiyorum.

Ayrıca bu isteğim vba kodu ile otomatik olarak yapılır mı? Yani Basketbol sayfasında filtreleme yapınca D ve E hücrelerindeki takım isimleri Ana Sayfaya geçtiğimde D ve E hücrelerine otomatik gelsin.

Yardımcı olacak ustalara şimdiden teşekkür ederim.

HTML:

İçeriği görebilmek için Giriş yap ya da Üye ol.

 

[mert25]

Teşekkürler fakat bu kodu nasıl çalıştıracağımı bulamadım.

 

[murat_8181]

basketbol sayfasına commondbutton1 nesnesi açın ve içine kopyalayın

 

[mert25]

Çok teşekkür ederim, kod çok güzel çalıştı, fakat aşağıdaki satırda D2'yi D1 yapınca Ana Sayfada doğru hücrelere takım isimleri yazıldı. D2 olunca bir alt satıra yazıyordu.

HTML:

İçeriği görebilmek için Giriş yap ya da Üye ol.

 

[murat_8181]

bende istenilen hücrelere kopyaladı böyle bir sorun olmadı

 

[mert25]

sizdeki örnek dosyayı ekleyebilir misiniz? merak ettim neden orijinal dosyada olmadı diye.

 

[murat_8181]

sizdeki örnek dosyayı ekleyebilir misiniz? merak ettim neden orijinal dosyada olmadı diye.

bende d3 ve e3 hücresine almışım verileri şimdi baktım hedefHücre = wsAnaSayfa.Range("D2").Offset(0, 0) bu şekilde yazarsanız yine istdeiğiniz sonucu verir

 

[mert25]

bende d3 ve e3 hücresine almışım verileri şimdi baktım hedefHücre = wsAnaSayfa.Range("D2").Offset(0, 0) bu şekilde yazarsanız yine istdeiğiniz sonucu verir

Evet şimdi oldu.

Tekrar teşekkür ederim, elinize sağlık.