Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Single Sheet - Calculate Manually
Hi Mark,
Your solution works OK if there are no intersheet dependencies, or the sheets just happen to be calculated in the right sequence. But its much safer to use the worksheet.enablecalculation property: in a workbook_Open event Worksheets("CalcIntensive").enablecalculation=fals e assign this sub to a button: sub Specialcalc() worksheets("CalcIntensive").enablecalculation=true application.calculate Worksheets("CalcIntensive").enablecalculation=fals e end sub Charles ______________________ Decision Models The Excel Calculation Site www.DecisionModels.com "Mark Bigelow" wrote in message ... Oops, I forget to tell you to put the following code in the ThisWorkbook object: Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range) Call CalculateAllExcept (or whatever the sub was called that I just sent!) End Sub --- Mark Bigelow http://hm.imperialoiltx.com *** Sent via Developersdex http://www.developersdex.com *** Don't just participate in USENET...get rewarded for it! |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Single Sheet - Calculate Manually
Thank you to all those who replied. That was exactly what I was looking
for!! Charles Williams wrote: Hi Mark, Your solution works OK if there are no intersheet dependencies, or the sheets just happen to be calculated in the right sequence. But its much safer to use the worksheet.enablecalculation property: in a workbook_Open event Worksheets("CalcIntensive").enablecalculation=fals e assign this sub to a button: sub Specialcalc() worksheets("CalcIntensive").enablecalculation=true application.calculate Worksheets("CalcIntensive").enablecalculation=fals e end sub Charles ______________________ Decision Models The Excel Calculation Site www.DecisionModels.com "Mark Bigelow" wrote in message ... Oops, I forget to tell you to put the following code in the ThisWorkbook object: Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range) Call CalculateAllExcept (or whatever the sub was called that I just sent!) End Sub --- Mark Bigelow http://hm.imperialoiltx.com *** Sent via Developersdex http://www.developersdex.com *** Don't just participate in USENET...get rewarded for it! |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Creating a template that is manually updated from another sheet. | Excel Worksheet Functions | |||
How do I calculate the interest payment manually (without using IP | Excel Worksheet Functions | |||
How do I manually calculate this formula PV(P3/1200,Q3,-N3*M3/100 | Excel Worksheet Functions | |||
is it possible to use F9 to manually calculate in a single sheet or single workbook? | Excel Discussion (Misc queries) | |||
Single Sheet - Calculate Manually | Excel Programming |