Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Turning Of Calculation
I use the following to turn off the calculation and then
back on when exiting my workbook. Private Sub Workbook_Activate() Application.Calculation = xlManual Application.CalculateBeforeSave = False End Sub Private Sub Workbook_Deactivate() Application.Calculation = xlAutomatic Application.CalculateBeforeSave = True End Sub When I open only one workbook at a time it works fine but when I open a second workbook with the same code it starts to calculate also everytime I close my workbook it asks if I want to save the changes. Is there a way to not calculate when a second workbook is opened with the same code and to not ask if I want to save changes unless I have made changes? TIA Joe |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Turning Of Calculation
When you go from one workbook to the other, it turns calculation back on I
believe. The activate event fires before the deactivate event I believe, but it would be easy to test. I guess you would have to figure out how to maintain your setting within the way you intend to use your workbooks. -- Regards, Tom Ogilvy "Joe Gieder" wrote in message ... I use the following to turn off the calculation and then back on when exiting my workbook. Private Sub Workbook_Activate() Application.Calculation = xlManual Application.CalculateBeforeSave = False End Sub Private Sub Workbook_Deactivate() Application.Calculation = xlAutomatic Application.CalculateBeforeSave = True End Sub When I open only one workbook at a time it works fine but when I open a second workbook with the same code it starts to calculate also everytime I close my workbook it asks if I want to save the changes. Is there a way to not calculate when a second workbook is opened with the same code and to not ask if I want to save changes unless I have made changes? TIA Joe |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Turning =E13 to =$E$13 | Excel Worksheet Functions | |||
keeps turning off | Excel Worksheet Functions | |||
Turning off and keeping off auto calculation | Excel Discussion (Misc queries) | |||
Turning 0.000 values red | Excel Worksheet Functions | |||
Turning #N/A to a zero...?? | Excel Discussion (Misc queries) |