Excel and No Save

[Guest]

Hi

I have a read-only excel spreadsheet which my users open, there is a link to
an access database using ms query which automatically updates to show them
the latest information which they are supposed to use.

However, the little monsters, have a habit of saving it elsewhere and using
the wrong version. Is there any way i can stop them from saving it elsewhere,
i have tried removing the toolbars but i still get the 'File, Edit' etc menus
and anyway this isn't good because then they don't re-open when my users open
a completely unrelated spreadsheet.

Any help would be greatly appreciated.
Thanks
Emma

 

[Chip Pearson]

Emma,

Use the BeforeSave event. In the ThisWorkbook code module, paste
the following code:

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel
As Boolean)
Cancel = SaveAsUI
End Sub

This will allow the workbook to be saved, but not under a
different name.

--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com

 

[Dave Peterson]

Just to add to Chip's response...

This won't stop the little devils from using windows explorer and copying your
file and pasting to a new location.

 

[Guest]

Chip. Excellent. thanks. Effectively it disables the save as and as i have
it read only that should do the trick!

Dave. I'm going to save the template somewhere obscure and I'm hoping my
little devils aren't that bright but thanks very much for the warning,
hopefully it'll put off all but the brightest of the bunch and i'll probably
be able to control them by bashing their heads together if they do!