Bul Makrosu

[Orion1]

Merhabalar.
Düzen - Bul - Tümünü Bul seçerek aradığımız bir veriyi Sayfa içersinde ,bulunan verinin ismi ve Bulunduğu adres verilerek aşağıda listeleniyor.
Bu işlemi Makro ile ,Yalnızca A:A sütununda yaptırıp listbox'ta listelemek istiyorum.
Teşekkür ederim.İyi çalışmalar.
:hey:

 

[veyselemre]

Son hali aşağıda,

 

[Orion1]

Merhabalar.
Sayın : veyselemre
Yolladığınız dosya için teşekkür ederim.
TextBox'a Girilen değeri birebir arama Şeklinde düzenleyebilirmiyiz programı.
Yani textbox'a hangi değer girilmişse yalnızca onları arasın.
İyi çalışmalar.
:hey:

 

[veyselemre]

aşağıdaki ilaveleri yapın
Set c = Range("a:a").Find(TextBox1, LookIn:=xlValues, MatchCase:=True, LookAt:=xlWhole)

 

[Orion1]

Merhabalar.
Sayın hocam teşekkür ederim.
İstediğim oldu.Yalnız aradığım veri a1 hücresindede bulunuyorsa listbox'ta son sırada listeleniyor.
İyi çalışmalar.

 

[veyselemre]

Ekteki örneği inceleyiniz,

 

[Orion1]

Merhabalar.
Hocam süper olmuş.
Teşekkür ederim.
İyi çalışmalar.
:hey:

 

[levuu]

merhaba
sanırım aktarımda dosya silinmiş dosyayı ekleyebilirmisiniz
teşekkürler