Sub Formülkoy ()
Range("B20").Select
ActiveCell.FormulaR1C1 = "=VLOOKUP(BAGLAN,VERİTABAN,14,TRUE)"
End Sub
Arkadaşlar..! Yukarıda B20 hücresine formül yazdıran makronun select kısmını kaldırmak istiyorum..Yani B20 hücresini seçmeden gerçekleşsin.
Range("B20").Select
ActiveCell.FormulaR1C1 = "=VLOOKUP(BAGLAN,VERİTABAN,14,TRUE)"
End Sub
Arkadaşlar..! Yukarıda B20 hücresine formül yazdıran makronun select kısmını kaldırmak istiyorum..Yani B20 hücresini seçmeden gerçekleşsin.
