Aşağıdaki kodda bulunacak değer B1 hücresinden alınmaktadır. İmleç değerin bulunduğu hücreye gider.
[vb:1:36a5102d4f]Sub bul()
on error resume next
Columns("A").Find([b1].Value).Select
End Sub[/vb:1:36a5102d4f]
yukarıdaki kodu bir modüle yazdıktan sonra sayfaya buton ekleyip kodu bu butona bağlayın,A sütununa aranacak değerleri yazın, B1 hücresinede arayacağınız değeri yazın ve butona basın.
Sizlere daha iyi bir deneyim sunabilmek icin sitemizde çerez konumlandırmaktayız, web sitemizi kullanmaya devam ettiğinizde çerezler ile toplanan kişisel verileriniz Veri Politikamız / Bilgilendirmelerimizde belirtilen amaçlar ve yöntemlerle mevzuatına uygun olarak kullanılacaktır.