Thread: SaveAs Question
View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Dave Peterson Dave Peterson is offline
external usenet poster
 
Posts: 35,218
Default SaveAs Question

This should stop any File|Save or File|SaveAs.

Maybe you turned off events (application.enableevents = false) and forgot to
reenable it???

Or maybe the workbook was opened and macros were disabled???

Rob wrote:

I was wondering if there was amethod of capturing the SaveAs and disabling it
before the user tries to use it? I have this code for the Save but it still
allows the user to use SaveAs.

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

If Application.UserName < "rcj" Then

Cancel = True
MsgBox "Sorry, But You Don't Have Permission To Save This File",
vbExclamation, "Invalid Permission"

End If

'MsgBox Application.UserName

End Sub

Thanks In Advance,
Rob


--

Dave Peterson