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

22 votes507 views1 answer
Excelvba check for directory
VBA
1 vote252 views1 answer
Find and replace textbox
VBA
1 vote246 views1 answer
Vba loop through files in folder
VBA
0 vote245 views1 answer
Search for text in every worksheet excel visual basic
VBA
0 vote220 views2 answers
How to update date and time automatically once id is entered in excel vba
VBA
0 vote197 views1 answer
Vbnet make a string to unicode converter
VBA
-1 vote234 views1 answer
System.Data.OleDb.OleDbException: 'No value given for one or more required parameters.'
VBA
0 vote225 views1 answer
Vbs
VBA
22 votes535 views1 answer
Xl vba check for folder
VBA
0 vote234 views1 answer
Check if program is running vbnet
VBA