In the This Workbook Object Code paste the following.On 2002-05-03 15:34, mangoel wrote:
Hello All,
I was wondering if it is possible to automatically set the calculation mode in Excel to "Manual" through an workbook_open event or through the press of a command button. The interactions in a workbook that I have created require the calculation mode to be set to manual.
I would really apreciate your help with this. Thanks!
Manish
Private Sub Workbook_Open()
With Application
.Calculation = xlManual
.MaxChange = 0.001
End With
End Sub
Below is some nice code you can add to avoid having to go through the menus all the time.
I have added this to my personal macro book and use ALL the time.
It toggles Calculation on/off and is assigned to a permanent button on my toolbar.
Sub Toggle_Calc()
If Application.Calculation = xlCalculationAutomatic Then
With Application
.Calculation = xlManual
.MaxChange = 0.001
End With
ActiveWorkbook.PrecisionAsDisplayed = False
Else
With Application
.Calculation = xlAutomatic
.MaxChange = 0.001
End With
ActiveWorkbook.PrecisionAsDisplayed = False
End If
End Sub
Hope This Helps
![]()
_________________
[ This Message was edited by: s-o-s on 2002-05-03 15:40 ]
[ This Message was edited by: s-o-s on 2002-05-03 15:41 ]
Like this thread? Share it with others