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 vote151 views1 answer
Visual basic run command
VBA
0 vote116 views1 answer
Excel vba formatconditions positive
VBA
0 vote135 views1 answer
Write listbox to text file vb.net
VBA
0 vote110 views1 answer
Docker vboxmanage not found
VBA
2 votes115 views1 answer
Vba uppercase first letter of each word
VBA
0 vote134 views1 answer
Dlete rows with blanks and space " " vba
VBA
0 vote117 views1 answer
Excel vba disable copy paste
VBA
0 vote137 views1 answer
How to add line graph vb net
VBA
0 vote119 views1 answer
Vba add month to date
VBA
0 vote193 views1 answer
Find the name of the last excel sheet vb
VBA