Macro working bar

A

Alberto Ast

I have a long macro runing under
Application.ScreenUpdating = False
but I would like to have a bar showing in prograss or some action so user
will know system is working and not freeze up.
Something similar as windows does to show something is happening.

Thanks.
 
J

Jacob Skaria

Application.Cursor = xlWait
Application.StatusBar = "Please wait...<some activity> in Progress"


If this post helps click Yes
 
A

Alberto Ast

thanks but I got the little circle going around but I can not make it to
stop...
 
J

Jacob Skaria

Do you mean; to revert back

Application.Cursor = xlWait
Application.StatusBar = "Please wait...<some activity> in Progress"
Application.ScreenUpdating = False

'your code

Application.ScreenUpdating = True
Application.Cursor = xldefault
Application.StatusBar = False

If this post helps click Yes
 
A

Alberto Ast

Have not been able to see the a´plication status bar message.... I even put
the macro on break mode to see if it was going too fast bt never showed up
 
J

Jacob Skaria

Try the below on top...
Application.DisplayStatusBar =true

If this post helps click Yes
 
A

Alberto Ast

I finaly saw the status bar but it is at the bottom of the screen... is there
any way to put it in the midle of the screen...?
Thanks
 
A

Alberto Ast

I acess the below www and get to see some nice samples but in all the status
bar is at the very bottom of the screen hard to see... can I move it to
midle of the screen...
 
Top