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 vote190 views1 answer
Vba parameter adodb null value
VBA
25 votes249 views3 answers
String to date vb
VBA
0 vote166 views1 answer
Dynamically change drop down list visual basic
VBA
0 vote141 views1 answer
Vba select file in folder
VBA
0 vote185 views1 answer
Excel vba paste all to each sheet in workbook
VBA
0 vote169 views1 answer
Excel PasteSpecial Format:= can't find the argument
VBA
0 vote168 views1 answer
Vba get text file content
VBA
0 vote173 views1 answer
Vbnet dynamically change excel sheet name
VBA
0 vote179 views1 answer
Vba copy file
VBA
0 vote177 views1 answer
Vba full date format
VBA