View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.misc
L Weber L Weber is offline
external usenet poster
 
Posts: 6
Default Disable Quick Save & Save As

I have found a string (below) to put into M.V.B. that works great for this.
When I click over to the excel file it does not allow me to Q.Save or
File/Save as€¦.. But now I cannot save the file with the new macro because I
have disabled that function? I am a newbie to M.V.B. but this seems like
some strange Catch 22 situation€¦. Please help if possible.


Private Sub Workbook_BeforeClose(Cancel As Boolean)
Me.Saved = True
End Sub

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



--
L Weber