Bir Değeri Renklendirme isimli içerikte, ilgili işlemin VBA kodları ile nasıl yapacağınızı öğreten bir Hazır Makro Kodu yer almaktadır.
Aramak istediğiniz değeri InputBox nesnesine yazmanız yeterli olacak, o değer renklenecektir.
Faydalanılması temennisiyle
Hazır Kod
VBA:
Sub Bir_Degeri_Renklendirme()
Dim Alan As Range
Dim i As Integer
Dim c As Variant
c = InputBox("Vurgulanacak değeri girin")
For Each Alan In ActiveSheet.UsedRange
If Alan = c Then
Alan.Style = "Not" 'İngilizce için "Note" yazınız.
i = i + 1
End If
Next Alan
End SubAçıklama
Hücrelere herhangi bir metin yazın ve kodu çalıştırın.Aramak istediğiniz değeri InputBox nesnesine yazmanız yeterli olacak, o değer renklenecektir.
Faydalanılması temennisiyle
