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

2 votes181 views2 answers
Excel vba copy values range to another range
VBA
0 vote194 views1 answer
Dlete rows with blanks and space " " vba
VBA
-1 vote220 views1 answer
How save excel through visual basic
VBA
4 votes175 views1 answer
Excel vba check cell not empty
VBA
0 vote210 views1 answer
Vba dictionary length
VBA
0 vote183 views1 answer
Vba open report
VBA
-1 vote203 views1 answer
Text to speech vb.net
VBA
0 vote221 views1 answer
Set datetimepicker value to null vb
VBA
0 vote194 views1 answer
Remove first character from string vb
VBA
0 vote191 views1 answer
VB Error Code BC30201
VBA