calculate only when macro has been enable.

[SamT]

[VBA]Sub Application_WindowActivate(ByVal Wb As Excel.Workbook, ByVal Wn As Excel.Window)
Wb.Application.CALCULATION = xlCalculationManual
End Sub[/VBA]