Can you disable the save function from a shared workbook

[Guest]

We have created a workbook to share with our team. However we want to
prevent users from saving the workbook to their desktops as the form will be
updated on a regular basis and want to ensure that they are using the current
version. Can this be done?

 

[Guest]

You may be able to put something in the Workbook_beforesave event, but I'm
not certain.

 

[Dave Peterson]

You could try to stop them from saving anywhere with code, but that won't stop
them from using windows explorer to just copy|paste to a new location.

One thing that you may want to try is to check to see if the file came from the
correct location.

Something like this in the Auto_Open procedure:

Option Explicit
Sub auto_Open()

If LCase(ThisWorkbook.FullName) = "c:\my documents\excel\book1.xls" Then
'ok, keep going
Else
MsgBox "Not the correct location"
ThisWorkbook.Close savechanges:=False
End If
End Sub

But macros can be disabled--or the Auto_Open procedure could be avoided.

In my experience, this is a training/threat issue. Make sure that the users
understand what happens if they don't use the most current version of the
workbook. (Threats by your manager may be enough.)