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

2 votes157 views1 answer
Excel vba date to string conversion
VBA
0 vote157 views1 answer
Vba is integer
VBA
0 vote189 views1 answer
Set datetimepicker value to null vb
VBA
0 vote146 views1 answer
Excel vba disable copy paste
VBA
0 vote146 views1 answer
Vbs exec hidden
VBA
0 vote144 views1 answer
Vba len variant
VBA
0 vote157 views1 answer
Vbnet find highest value in chart
VBA
5 votes173 views1 answer
Vba low byte from INTEGER
VBA
1 vote153 views1 answer
Excel vba to lower case
VBA
1 vote163 views1 answer
Excel vba last row of range
VBA