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 vote225 views2 answers
Vb.net include quotes in string
VBA
0 vote216 views1 answer
How to use VBA to add new record in MS Access?
VBA
0 vote228 views1 answer
Vba compare strings
VBA
2 votes211 views1 answer
Vba uppercase first letter of each word
VBA
0 vote240 views1 answer
Find if year is leap year vb
VBA
0 vote219 views1 answer
Vb get ip address
VBA
0 vote217 views1 answer
Get current year vb
VBA
0 vote222 views1 answer
Vbnet find highest value in chart
VBA
1 vote232 views1 answer
Vb.net get name by Selection Changed
VBA
-1 vote217 views1 answer
For i in range vba
VBA