Press Alt F11.

Select the ThisWorkbook module for the VBA project your editing.

Paste this in.

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

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

--
HTH,
Barb Reinhardt

If this post was helpful to you, please click YES below.



"Tenacity9" wrote:

Setting Tools-Options-Calculation to manual (ie, have to use F9) changes the
preference for all open workbooks in Excel 2003.

If you only want manual recalculation to apply to a particular workbook
permanently (in other words until the preference is changed back to
automatic), but other open workbooks and all new workbooks to be calculated
automatically (ie, no F9), is there a way to accomplish this easily?

Thanks.