Calculation macro upon opening and closing

[pauldaddyadams]

Hi,

I have a spreadsheet in which I need it to run a macro upon opening.

If possible whenever the spreadsheet is opened I require the following to be actioned:

Tools>Options>Calculation to be set to Manual and recalculate to be unchecked

And then upon exiting the spreadsheet the macro would need to turn automatic calculation back on.

Can anyone suggestions with the VBA code?

[jasoncw]

Hi, Paul.

Right-click on the Excel icon next to the File menu, then select View Code, and copy the following code:

Private Sub Workbook_Open()
    With Application
        .Calculation = xlManual
        .CalculateBeforeSave = False
    End With
End Sub

Private Sub Workbook_BeforeClose(Cancel As Boolean)
    Application.Calculation = xlCalculationAutomatic
End Sub

HTH

Jason

[pauldaddyadams]

Brilliant, it worked a treat. Thank You

[jasoncw]

Glad it helped.

Jason