- Katılım
- 2 Nisan 2008
- Mesajlar
- 132
- Excel Vers. ve Dili
- 2003 TÜRKÇE
- Altın Üyelik Bitiş Tarihi
- 25.05.2019
Selam,
L sütununda isimler var.
K2 hücresine isim yazıp aşağıdaki makroyu çalıştırıyorum ve ilk ismi buluyor.
İstediğim bu makroya döngü yaparak makroyu her çalıştırdığımda bir sonraki ismi bulması ve
sonunda da "BAŞKA İSİM YOK" mesajı ile işlemin sonlanması...
Şimdiden teşekkürlerimi sunuyorum.
L sütununda isimler var.
K2 hücresine isim yazıp aşağıdaki makroyu çalıştırıyorum ve ilk ismi buluyor.
İstediğim bu makroya döngü yaparak makroyu her çalıştırdığımda bir sonraki ismi bulması ve
sonunda da "BAŞKA İSİM YOK" mesajı ile işlemin sonlanması...
Şimdiden teşekkürlerimi sunuyorum.
Kod:
Sub isimbul()
Dim sat As Long
On Error GoTo atla
sat = WorksheetFunction.Match([k2], [l:l], 0)
Range("e" & sat).Select
' Exit Sub
atla:
MsgBox "BAŞKA İSİM YOK"
End Sub