View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.worksheet.functions
Colin Hayes Colin Hayes is offline
external usenet poster
 
Posts: 465
Default Re-establish function on exiting workbook


HI All

I use this code to turn Automatic Calculation to Manual when I open my
workbook :


Private Sub Workbook_Open()


With Application
.Calculation = xlManual
.MaxChange = 0.001
.CalculateBeforeSave = False
End With
ActiveWorkbook.PrecisionAsDisplayed = False
End Sub



Can someone advise how to extend this so that it switches Automatic
Calculation back on when I close the workbook?



Thanks