Makroyla kelime bulma

[bars.1]

İyi günler herkese kolay gelsin. Exel vba makroyla sayfa1 de bir cümle aratıp o cümlenin bulunduğu satırı bulabileceğimiz bir kod var mı acaba?

 

[Orion1]

Formda find diye arama yaparsanız bulabilirsiniz.

 

[bars.1]

Anlatamadım herhalde makroyla yapmak istiyorum bunu makroyla sayfada bir cümle bulup o cümlenin bulunduğu satırı verecek bir makro kodu lazım

 

[Orion1]

Ben anlatamadım galiba.
A sütununda osman arar.

Sub bul()
Dim k As Range, deger As String
deger = "osman"
Set k = Range("A:A").Find(deger, , xlValues, xlWhole)
If Not k Is Nothing Then
    MsgBox k.Row
    Else
    MsgBox deger & " bulunamdı"
End If
End Sub

 

[Korhan Ayhan]

Amanın üyelere ARAMA yapın dememek lazım...

 

[bars.1]

Teşekkürler yeni olduğum için demek istediğinizi anlayamadım.