Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 968
Default 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   Report Post  
Posted to microsoft.public.excel.programming
WP WP is offline
external usenet poster
 
Posts: 2
Default 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
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
Creating a template that is manually updated from another sheet. [email protected] Excel Worksheet Functions 6 October 22nd 08 09:27 PM
How do I calculate the interest payment manually (without using IP Grd Excel Worksheet Functions 4 April 2nd 07 11:45 PM
How do I manually calculate this formula PV(P3/1200,Q3,-N3*M3/100 Claressa Excel Worksheet Functions 2 December 9th 05 07:27 PM
is it possible to use F9 to manually calculate in a single sheet or single workbook? Hersbt Excel Discussion (Misc queries) 2 December 29th 04 05:42 PM
Single Sheet - Calculate Manually Mark Bigelow[_2_] Excel Programming 0 July 8th 03 09:21 PM


All times are GMT +1. The time now is 03:12 AM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Copyright ©2004-2024 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"