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 vote120 views3 answers
Write to text file vb.net
VBA
0 vote123 views1 answer
VB get external IP address
VBA
0 vote118 views1 answer
How to extract a file from an ISO:
VBA
0 vote134 views2 answers
Checking and changing system volume vb.net
VBA
0 vote114 views1 answer
Vbnet chart make 0 gridline line different color
VBA
0 vote120 views1 answer
Vbs send keys
VBA
0 vote118 views1 answer
Vb streamreader
VBA
0 vote116 views1 answer
Vba timestamp -- milliseconds
VBA
5 votes138 views1 answer
Excel vba tool to help with refactoring code
VBA
0 vote125 views1 answer
Vba get application version
VBA