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

-1 vote141 views2 answers
Excel vba delete empty rows
VBA
1 vote126 views1 answer
Add a index column power bi
VBA
0 vote141 views1 answer
Open file dialog in vb.net
VBA
0 vote136 views1 answer
Vba variable number of arguments
VBA
0 vote124 views1 answer
Change whcih control a user has selected vb
VBA
7 votes152 views1 answer
Excerl vba array to range
VBA
0 vote145 views1 answer
Vba count all row
VBA
0 vote142 views1 answer
Excel filter by date not working vba
VBA
8 votes209 views1 answer
Vba make integer
VBA
0 vote133 views1 answer
Get month number from month name vbnet
VBA