SORU ve CEVAPLAR (Yazılabilir) > Microsoft Excel, Vba, Makro, Formül vb. Soruları
düşeyara komutu makro ile çalıştırma
(1/1)
wildkiss23:
Merhabalar.
Ekte paylaştığım deneme sayfasında düşeyara komutunu kullanıyorum. Bu komutun görevini yapacak makro yazabilir miyim?
Yardımlarınızı bekliyorum arkadaşlar.
Şimdiden teşekkürler.
wildkiss23:
Merhabalar.
Ekte paylaştığım deneme sayfasında düşeyara komutunu kullanıyorum.
Bu komutun görevini yapacak makro yazabilir miyim?
Yardımlarınızı için şimdiden teşekkürlerimi borç bilirim.
Bülent Öztürk:
Merhaba,
Cevap epey geç oldu, kusura bakmayın. Umarım bu zamana kadar çözüm bulmuşsunuzdur, ancak yine de paylaşmak isterim:
--- Kod: ---Sub Makro_ile_Duseyara()
Dim sondolusatir As Integer
sondolusatir = Range("A65530").End(3).Row
Set verialani = Range("M:Q")
Range("I4:I" & sondolusatir).ClearContents
For excelce = 4 To sondolusatir
On Error Resume Next
Range("I" & excelce).Value = Application.WorksheetFunction.VLookup(Range("A" & excelce).Value, verialani, 5, False)
Next excelce
End Sub
--- Kod sonu ---
Navigasyon
[0] Mesajlar
Tam sürüme git