Hücreye veri girdikçe uyar

[ADER_34]

Merhaba sayfa1 "E" sütununda ki hücrelere alt alta veri giriyorum ve her veri girişimde beni mesajla uyarıp "MESAJ" "ARIZA BELİRT" demesini istiyorum mümkünmü kolay gelsin teşekkürler..

 

[antonio]

Merhaba,
Belirttiğiniz sayfanın sekmesine sağ tıklayıp, "Kod görüntüle" seçeneğine tıklayın, açılan kod penceresine aşağıdaki kodu yapıştırın.

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("E2:E" & Rows.Count)) Is Nothing Then
    MsgBox "Mesaj: ARIZA BELİRT!", vbExclamation, "antonio"
End If
End Sub

 

[ADER_34]

Merhaba Sayın antonio kodlarınız sorunsuz çok teşekkür ederim,peki kodlara ilave olarak eğer F2:F sütununda E2:E satırı dolu ama F2:F satırı boş sa aynı uyarıyı vermesi mümkün mü ?

örnek--- "E20" dolu "F20" boş gibi kolay gelsin teşekkürler..