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 vote168 views1 answer
Vba add shape oval
VBA
5 votes178 views1 answer
Xl vba double quotes in string literal
VBA
0 vote162 views1 answer
Remove frist letter from string vbnet
VBA
8 votes266 views1 answer
Excel vba determine number of elements in a 2D array
VBA
0 vote187 views1 answer
VBA OR vb6 find OR replace string from the end
VBA
0 vote206 views1 answer
Excel vba unlock sheet without password
VBA
1 vote129 views1 answer
Vba Remove Case Sensitivity
VBA
5 votes192 views1 answer
Excel vba highlight cells using the hex color value within the cells
VBA
4 votes174 views2 answers
Vba array length
VBA
0 vote192 views1 answer
.net dark title bar
VBA