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



"Emma Hope" wrote in message
...
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