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 vote302 views1 answer
Vba foreach 2d array
VBA
0 vote269 views1 answer
Vbs write file
VBA
0 vote265 views1 answer
Change whcih control a user has selected vb
VBA
0 vote306 views1 answer
Vba userform textbox wrap text
VBA
0 vote291 views1 answer
Add text to Shape VBA
VBA
0 vote273 views1 answer
Excel vba cell on change
VBA
0 vote266 views1 answer
Vlookup columns not next to each other
VBA
0 vote269 views1 answer
VB Error Code BC30201
VBA
0 vote251 views1 answer
Add Formula to Shape Text in VBA
VBA
0 vote277 views1 answer
Check if cell is dbnullvb.net
VBA