Excel VisualBasic Script

  1. Home
  2. VisualBasic Script
  3. Excel
  4. Cancel Close action based on the A1 value
Sub Workbook_BeforeClose(Cancel As Boolean)
         If ThisWorkbook.Sheets("Sheet1").Range("A1").Value <> True Then
            Cancel = True
         End If
     End Sub