ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Findjjing the range that triggered worksheet calculate (https://www.excelbanter.com/excel-programming/295170-findjjing-range-triggered-worksheet-calculate.html)

Chick[_2_]

Findjjing the range that triggered worksheet calculate
 
I am using Excel 97.
I use VBA to populate 2 cells with values.
When these cells are populated two adjacent cells containing formulas
trigger the worksheet calculate event. I do not want this to happen.

I have tried using application.caller..

Select Case TypeName(Application.Caller)
Case "Range"
v = Application.Caller.Address
Case "String"
v = Application.Caller
Case "Error"
v = "Error"
Case Else
v = "unknown"
End Select
MsgBox "caller = " & v

But it always returns "Error"

Is there another way to find out what is triggering the worksheet
calculate?

Charles Williams

Findjjing the range that triggered worksheet calculate
 
There is no general way of finding out which formulae or events have
triggered a recalculation.

If you want to stop the recalculation then either
- switch calculation to manual
- make sure that no formulae refer to the cells you are populating


regards
Charles
______________________
Decision Models
FastExcel Version 2 now available.
www.DecisionModels.com/FxlV2WhatsNew.htm

"Chick" wrote in message
om...
I am using Excel 97.
I use VBA to populate 2 cells with values.
When these cells are populated two adjacent cells containing formulas
trigger the worksheet calculate event. I do not want this to happen.

I have tried using application.caller..

Select Case TypeName(Application.Caller)
Case "Range"
v = Application.Caller.Address
Case "String"
v = Application.Caller
Case "Error"
v = "Error"
Case Else
v = "unknown"
End Select
MsgBox "caller = " & v

But it always returns "Error"

Is there another way to find out what is triggering the worksheet
calculate?




Frank Kabel

Findjjing the range that triggered worksheet calculate
 
Hi
before inserting the values ypu may add the line
application.enableevents = false

and after the insertion:
application.enableevents = true


--
Regards
Frank Kabel
Frankfurt, Germany


Chick wrote:
I am using Excel 97.
I use VBA to populate 2 cells with values.
When these cells are populated two adjacent cells containing formulas
trigger the worksheet calculate event. I do not want this to happen.

I have tried using application.caller..

Select Case TypeName(Application.Caller)
Case "Range"
v = Application.Caller.Address
Case "String"
v = Application.Caller
Case "Error"
v = "Error"
Case Else
v = "unknown"
End Select
MsgBox "caller = " & v

But it always returns "Error"

Is there another way to find out what is triggering the worksheet
calculate?



Charles Williams

Findjjing the range that triggered worksheet calculate
 
Note that setting enablevents to false will prevent the worksheet calculate
event from being called but if you are in automatic mode the formulae will
still be recalculated.


regards
Charles
______________________
Decision Models
FastExcel Version 2 now available.
www.DecisionModels.com/FxlV2WhatsNew.htm

"Frank Kabel" wrote in message
...
Hi
before inserting the values ypu may add the line
application.enableevents = false

and after the insertion:
application.enableevents = true


--
Regards
Frank Kabel
Frankfurt, Germany


Chick wrote:
I am using Excel 97.
I use VBA to populate 2 cells with values.
When these cells are populated two adjacent cells containing formulas
trigger the worksheet calculate event. I do not want this to happen.

I have tried using application.caller..

Select Case TypeName(Application.Caller)
Case "Range"
v = Application.Caller.Address
Case "String"
v = Application.Caller
Case "Error"
v = "Error"
Case Else
v = "unknown"
End Select
MsgBox "caller = " & v

But it always returns "Error"

Is there another way to find out what is triggering the worksheet
calculate?






All times are GMT +1. The time now is 08:59 AM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com