Soru Düşeyara Kodunu Bütün Sütuna Uygulama

Katılım
29 Mart 2013
Mesajlar
125
Excel Vers. ve Dili
office 2010
Herkese kolay gelsin.

Sayfa1 "A" sütunundaki verileri birinci hücreden başlamak suretiyle sırayla Sayfa2 "B" sütununda aratıp uyuşan hücreyi buldurup karşısındaki yani Sayfa2 "C" sütunundaki denk gelen veriyi Sayfa1 "B" sütununda sırayla arattığımız verinin karşısına butona basmak suretiyle yazdırmak istiyorum.

Tek bir satır için aşağıdaki gibi bir makro kullanıyorum ancak butona basmak suretiyle Sayfa1 "B" sütununa otomatik atmasını birtürlü yapamadım. Arattığımda benzerini buldum ancak tam benim istediğim gibi değildi. Umarım yardımcı olursunuz.

Sub duseyara()
ActiveCell.FormulaR1C1 = "=VLOOKUP(RC[-1],Sayfa2!C[-1]:C[1],3,0)"
End Sub
 
Üst