I have an application I have developed in Excel. I don't want the user to be able to save the sheet but I still need the ability to save via VBA on occasion so I can't make the file Read Only. Does anyone know a way to disable file saving using VBA?

Thanks

Use the Workbook_BeforeSave event to disallow saves

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
    MsgBox "Cannot Save File", vbInformation, "Wrox Test"
    Cancel = True
End Sub

However, you can disable the event in your code to save the file

Private Sub Save_Using_VBA()

    Application.EnableEvents = False

    '--- Write the code to Save Workbook

    Application.EnableEvents = True

End Sub

Cheers:)
Shasur

http://www.vbadud.blogspot.com