David,

Did you put this code in the ThsiWorkbook code module?



--

HTH

RP
(remove nothere from the email address if mailing direct)


"David" wrote in message
...
Greetings and TIA for your help.
I was hoping to do this with the code below but my workbook still
recalculates when opening, if another workbook (already open) was set to
automatic calculation.
Please advise

Private Sub Workbook_Open()
Application.Calculation = xlCalculationManual
End Sub
--
David