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

4 votes111 views2 answers
Vba last row
VBA
0 vote150 views1 answer
Excel text to columns line break
VBA
0 vote164 views1 answer
Show unix time in vba
VBA
0 vote208 views2 answers
Excel vba store array and write to sheet
VBA
0 vote159 views1 answer
COMO GRAVAR U VALOR NO ARQUIVO APPSETINGS EM VB NET
VBA
2 votes143 views2 answers
Constructor vb.net
VBA
0 vote154 views1 answer
Vbnet dynamically change excel sheet name
VBA
0 vote175 views1 answer
If statement vdhl
VBA
0 vote160 views1 answer
Vba run command
VBA
1 vote167 views1 answer
Set font for ms chart vb.net
VBA