View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Rpettis31 Rpettis31 is offline
external usenet poster
 
Posts: 49
Default Disable auto open


I have a workbook that has code to update files. the file is manipulated and
presented. I need to disable the auto open code. I had code to ask if you
want to update the file however the users wanted that to go away after the
report was formatted.

I added the if isnull code to prevent the update from occuring and did not
realize I disabled the code that would prevent an update.

I need to disable the Auto_Open code before the contents are erased.

or can someone tell me how to save the contents of the workbook and get rid
of the code?

I have tried to change macro settings does not seem to work.

Held shift key does not work...same with Ctrl break...


Sub Auto_Open()

If IsNull(Cells(1, 2)) Then
Answer = MsgBox("Would you like to update this file?", vbYesNo +
vbExclamation, "UPDATE FILE?")
If Answer = 7 Then Exit Sub
End If

Application.ScreenUpdating = False
Application.Calculation = xlCalculationManual


Range("a1:bk1000").Select
Selection.ClearContents