Az aktuális munkafüzet mentésének megakadályozása érdekében, ha az adott cella üres az Excelben, könnyen alkalmazhatja a következő VBA makrót.
1. lépés: Nyissa meg a Microsoft Visual Basic for Applications ablakot a más + F11 gombok közben.
2. lépés: A Project Explorerben bontsa ki a VBAProject (A munkafüzet neve.xlsm) Microsoft Excel objektumok, majd kattintson duplán a Ez a munkafüzet. Lásd a bal oldali képernyőképet:
3. lépés: A ThisWorkbook nyíló ablakba illessze be a következő VBA makrót:
VBA makró: A mentés megakadályozása, ha egy adott cella üres
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
If Application.Sheets("TEST").Range("A1").Value = "" Then
Cancel = True
MsgBox "Save cancelled"
End If
End Sub
Megjegyzés: A VBA-kódban a "TEST" a munkalap konkrét neve és a "
A1"a konkrét cella, és szükség szerint megváltoztathatja őket.