Go to the ThisWorkbook module and choose Workbook from the first dropdown at
the top of the module window (rather than General). Choose BeforeSave from
the righthand dropdown: this is a macro that will run automatically when
someone attempts to save the file. The following cancels the whole save
operation if the user chooses Save As:

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


"CarlSprake" wrote:

I am hoping that someone can help me with this problem.

Is there anyway to prevent a user from doing File - Save As? (preferably
using macros)

I am happy for them to make changes to a workbook, but do not want them to
be able to create different copies.

Thanks for your help