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 vote117 views1 answer
Vba paste values
VBA
0 vote127 views1 answer
Vba add shape oval
VBA
8 votes192 views1 answer
Excel vba make word from bytes
VBA
0 vote141 views1 answer
Excel vba add reference programmatically
VBA
0 vote117 views1 answer
Vbnet check if sting contians symbols
VBA
1 vote120 views1 answer
Excel vba to lower case
VBA
0 vote124 views1 answer
Vbscript abs
VBA
20 votes177 views1 answer
Excel vba factorial
VBA
1 vote116 views1 answer
Excel vba first and last row and column in range
VBA
0 vote113 views1 answer
Add Formula to Shape Text in VBA
VBA