Workbook_BeforeClose (Kapanış Öncesi Kontrol)

Kapanmayı Engellemek

Raporu eksik dolduran bir kullanıcının dosyayı kapatmasını iptal edebileceğiniz (Cancel = True) harika bir güvenlik yapısıdır. (ThisWorkbook bölümüne yazılır).

VBA Kodu:

Private Sub Workbook_BeforeClose(Cancel As Boolean)
    If Range("A1").Value = "" Then
        MsgBox "A1 hücresi boş bırakılamaz! Çıkış iptal edildi."
        Cancel = True
    End If
End Sub

Ne Göreceksiniz? Eğer A1 hücresi boşsa, kullanıcı çarpıya bassa dahi dosya KAPANMAYACAK ve ekrana zorunlu uyarı çıkacaktır.