Hi everyone,

I'm looking to build a spreadsheet that cannot be Saved / Saved As by the user at all. Looking online, I've seen the following piece of code which seems to work at first:
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
    
    MsgBox "You can't save this workbook!", , "Light Version"
    Cancel = True 'Cancels any request to save the file
End Sub

Private Sub Workbook_BeforeClose(Cancel As Boolean)
    Application.ThisWorkbook.Saved = True 'Tells Excel that the file has already been saved (this prevents Excel from requesting that you save the file when you close it)
End Sub

Private Sub Workbook_Open()
    Application.CommandBars("Worksheet Menu Bar").Controls("File").Controls("Save As...").Enabled = False
    Application.CommandBars("Worksheet Menu Bar").Controls("File").Controls("Save").Enabled = False
End Sub
When VBA is running, the code does its job. My issue is that nothing prevents the user from accessing the VBA window and clicking the "break" button to temporarily stop the subs from running, then saving the document and reactiving the subs afterwards. Is there a way around that trick?

Thanks