hücreyi boş geçmeme

[acebeci]

Çok değerli arkadaşlar oluşturduğum şablonda R2 ve Q2 hücreleri boş geçtiğinde uyarı msj vermesini istiyorum bu mümkün mü

 

[Mahir64]

Merhaba

uyarı mesajını yazdırırken mi çıkıştamı yoksa işlem devam ederken mi?

 

[acebeci]

İşlem devam ederken olur.ilginizden dolayı gerçekten çok teşekkür ederim

 

[acebeci]

Bu konu hakkında bir fikri olan yok mu acaba

 

[Korhan Ayhan]

Selamlar,

İşleme devam ederken ifadesinden kastınız nedir?

 

[acebeci]

Sayın Korhan Ayhan 2. Mesajdan sonra öyle bir ifade kullandım.benim istediğim R2 ve Q2 hücreleri boş geçtiğinde bir uyarı msj versin ve beni o hücrelere yönlendirsin

 

[Korhan Ayhan]

Selamlar,

Boş geçme olayı hangi şartta oluşuyor. Bunu belirtmiyorsunuz. Ben anladığım kadarıyla sayfanın hücre seçim olayına kodu yazdım. Siz ihtiyacınıza göre değiştirirsiniz.

Option Explicit
 
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If ActiveCell.Address(0, 0) = "Q2" Then Exit Sub
    If Range("Q2") = "" And ActiveCell.Address(0, 0) <> "Q2" Then
        MsgBox "Q2 hücresini boş geçemezsiniz !", vbCritical
        Range("Q2").Select
        Exit Sub
    End If
    
    If ActiveCell.Address(0, 0) = "R2" Then Exit Sub
    If Range("R2") = "" And ActiveCell.Address(0, 0) <> "R2" Then
        MsgBox "R2 hücresini boş geçemezsiniz !", vbCritical
        Range("R2").Select
        Exit Sub
    End If
End Sub

 

[acebeci]

Sayın Korhan Ayhan ilginizden dolayı çok teşekkür ederim daha ben derdimi bile tam anlatamamışken siz çözümü göndermişsiniz ilgi ve alakanızdan dolayı çok teşekkür ederim