Hücre istenilen değeri içeriyorsa uyarı versin..

[OoParadiSeoO]

arkadaşlar, D sütunundaki hücrelerin içeriğinde x ifadesi geçiyorsa uyarı vermesini sağlamak için makroyla nasıl çözümleyebiliriz? Örneğin D1 hücresinde pazartesix veya pazxartesi yazıyorsa içeriğinde x ifadesi olduğu için uyarı vermeli.

 

[Emir Hüseyin Çoban]

. . .

Option Compare Text
Sub kod()
    For i = 1 To Cells(Rows.Count, "D").End(3).Row
        If Cells(i, "D") Like "*" & "x" & "*" Then
            MsgBox Cells(i, "D")
        End If
    Next i
End Sub

. . .

 

[OoParadiSeoO]

İstediğim tam olarak buydu cok teşekkürler..