View Single Post
  #7   Report Post  
Posted to microsoft.public.excel.programming
Tom Ogilvy Tom Ogilvy is offline
external usenet poster
 
Posts: 27,285
Default Full recalculation when opening a workbook

That article was written when xl97 was the latest version.

--
Regards,
Tom Ogilvy

"Rowan" wrote in message
...
Hi Brian

See this article on setting up application level events. I don't know
for sure if this will work in 97 but it could be the answer to your
problem. If you implement application level events in your xla you can
then trap the workbook_open event and execute your sendkeys operation
everytime any workbook is opened.

http://www.cpearson.com/excel/AppEvent.htm

Hope this helps
Rowan

Brian wrote:
Actually, I believe now that my problem is not where I was looking for
it.

Remember that I want any .xls that is openned to be re-calculated once.
By putting the SUB Workbook_open procedure in my .xla I was effectively
telling Excel to recalculate only when the application openned (and
hence the add-in workbook openned too).

So, I now wonder: how do I put something in an add-in that will trap
the event of an .xls being openned? I guess that the
Application.WorkbookOpen event will be what I need.

Thanks for the help though!

Charles Williams wrote:

Hi Brian,

try this

Dim oSht as worksheet
Application.Calculation=xlCalculationManual

for each oSht in Worksheets
oSht.enablecalculation=false
osht.enablecalculation=true
next osht

Application.calculate


Charles
______________________
Decision Models
FastExcel 2.1 now available
www.DecisionModels.com

"Brian Hall" wrote in message
...

No, that does not 'force' my sheet to recalculate. From xl2000 on there

is
Application.CalculateFull, but my understanding is that CTRL-ALT-F9 is
equivalent in xl97

Nigel wrote:

Not sure if you can use the following in xl97 ?

Private Sub Workbook_Open()
Application.Calculate
End Sub