How to show a progress bar in sheet calculation?

[Zoo]

Excel shows "Calculating cells **%" in the statusbar while calculating.

I want to show my own progress bar instead of that while sheet calculation.
Does any one know how to do that?

 

[Norman Jones]

Hi Zoo,

See John Walkenbach at:

http://www.j-walk.com/ss/excel/tips/tip34.htm

Look also in VBA help for the StatusBar property.

 

[Zoo]

Thank you , Norman.

The URL helps me to understand how to display a progress bar
I have one thing to know. That is how to calculate the percentage.
The URL shows me how to display a progress bar in a single subroutine.
But I want to display that in muliple functions in multiple cells.

eg. Every cell in Range("A1:J100") (=1000cells) has formula " =Test()".
And Function Test() is declared in module1.
When Test() is called from A1 , B2, or C3 and so on,
I want to display how many cells in Range("A1:J100") have been
calculated.

In other words, I want to know how to get how many cells are already
calculated.

Sorry for my poor English.

 

[Norman Jones]

Hi Zoo,

I want to display how many cells in Range("A1:J100") have
been calculated.

Although Excel can display recalculation statistics in the status bar, I am
not aware that this information is accessible from VBA.

 

[Zoo]

Hi, Norman.

It seems that I have to give up.
Thank you so much.