Excel vba prevent save

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
    Cancel = True 
    msgbox "Forbidden."
End Sub

Excel vba prevent saving workbook

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
    Cancel = True                       ' Cancels in any case
    ' Or :
    If SaveAsUI Then Cancel = True      ' Cancels only if saving is asked by user, not via code
End Sub

' Prevents Excel from requesting a save before closing
Private Sub Workbook_BeforeClose(Cancel As Boolean)
    Application.ThisWorkbook.Saved = True
End Sub

Similar codes

0 vote189 views1 answer
Select case vba
VBA
0 vote201 views1 answer
Vba range clear formatting
VBA
0 vote170 views1 answer
Enter into cells data grid view
VBA
0 vote184 views1 answer
Vbscript check if string contains
VBA
0 vote189 views1 answer
Vba leading zeros in string
VBA
0 vote196 views1 answer
Vba excel do not recalculate before save
VBA
7 votes184 views1 answer
Vba array declaration
VBA
0 vote211 views1 answer
Vba boolean to string
VBA
0 vote198 views1 answer
Excel last used row
VBA
22 votes255 views1 answer
Excelvba check for directory
VBA