makro ile excel sayfasında kelime aratmak

[ismayil]

Merhaba,

Makro ile excel sayfasında kelime aratıp kelimenin bulunduğu hücreye gitmeyi ve hücrenin yanıp sönmesini nasıl sağlayabilirim. Aranan kelimeler sabit kelimeler değil. Parametrik. Her seferinde değişiklik gösteriyor.

 

[N.Ziya Hiçdurmaz]

yanıt

Sub bul()
deg = InputBox("Aranılan kelimeyi giriniz")
Cells.Find(deg).Activate
ActiveCell.Interior.ColorIndex = 4
End Sub