Makro ile VLookup Veri getirme

[muhammethezer]

Merhaba Değerli arkadaşlarım. Form isimli sayfada bulunan Listele butonuna bastığımda Kayıtlar sayfasından Form sayfası üzerine VLookup ile makroiledüşeara makrosunda yazdığım şekilde veri getirmek istiyorum ama hata alıyorum. Yardımcı olabilir misiniz? Teşekkür ederim.

 

[schlecht]

Sub makroiledüşeara()
Set S1 = ThisWorkbook.Worksheets("Form")
Set s2 = ThisWorkbook.Worksheets("Kayıtlar")
S1.Range("K19").Value = Application.VLookup(S1.Range("AJ11").Value, s2.Range("B:W"), 2, False)
S1.Range("K20").Value = Application.VLookup(S1.Range("AJ11").Value, s2.Range("B:W"), 3, False)
End Sub

 

[muhammethezer]

Bu kadar hızlı geri dönüş için teşekkür ederim. Elleriniz dert görmesin.

 

[schlecht]

İstediğiniz gibi çalıştı ise ne mutlu, ilk defa birine yardımcı olabildim bu arada burdan öğrendiğim kadarı ile forumdaki ustalar sağ olsun..