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 vote164 views1 answer
Vba shape transparent
VBA
0 vote178 views1 answer
Vba table header name
VBA
1 vote161 views2 answers
Vba find last row in range for certain criteria
VBA
0 vote170 views1 answer
Vba find sub dictionary
VBA
0 vote196 views1 answer
Vba cell all borders
VBA
0 vote173 views1 answer
Vba sort the data Z to A
VBA
22 votes310 views1 answer
Excel vba check if directory exists
VBA
0 vote159 views1 answer
Type excel.application is not defined vb
VBA
0 vote170 views1 answer
Vba format currency
VBA
0 vote166 views1 answer
Limit combobox to list vba
VBA