View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Doug Glancy Doug Glancy is offline
external usenet poster
 
Posts: 770
Default Saving a very tricky code

Open it with macros disabled, then add your code and save?

hth,

Doug Glancy

"Shilps" wrote in message
...
Hi,
I have a very tricky situation. I want to disble the save option of the

workbook. So I wrote this code

Private Sub Workbook_BeforeClose(Cancel as Boolean)

Application.DisplayAlerts = False
ThisWorkbook.Saved = True
ThisWorkbook.Close
Application.DisplayAlerts = true

End Sub

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

Application.DisplayAlerts = False
Cancel = True
Application.DisplayAlerts = true

End Sub

Now the problem is the moment I write this code, it is activated before

saving and this code is not saved at all. How do I save this code? My
objective is that the user should not be able to save any changes in the
workbook.
TIA
Shilps