View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Wstohler Wstohler is offline
external usenet poster
 
Posts: 3
Default Disable save, but not save as

I am trying to disable saving in order to not overwrite a master file. But I still want others to be able to save as a different file. I tried this as a possibility:

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
If ThisWorkbook.Name = "master.xls" Then
MsgBox "Can not save with this name - do saveas with a new name"
Cancel = True
End If
End Sub

But it won't let me do the 'save as' action either. Any Suggestions?

Thanks,
Wes