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

32 votes300 views2 answers
Excel vba column letter
VBA
1 vote206 views1 answer
Excel vba convert cells(1,1) into A1 and vice versa
VBA
12 votes268 views1 answer
Excel vba write string to text file
VBA
0 vote247 views1 answer
Winforms dark title bar
VBA
7 votes207 views1 answer
Vba array declaration
VBA
0 vote219 views1 answer
Vba min
VBA
0 vote207 views1 answer
Remove frist letter from string vbnet
VBA
-1 vote271 views1 answer
Vba sendkeys
VBA
0 vote240 views1 answer
Excel vba add reference programmatically
VBA
1 vote210 views1 answer
Highlight selected cell in excel vba
VBA