Message Box in VBA to say Please Wait

[jts2004]

I have a macro that takes about 30 sec. I would like a message to pop up saying "please wait" the disappear after the macro ends. Will this slow up my macro even more?

 

[DominicB]

Good afternoon jts2004

You will need to design a userform (go to Insert > Userform from the VBE) which is simplicity itself and use this call to show it (assuming you name it UserForm1):

Userform1.Show

and to dismiss it:

Unload UserForm1

A MsgBox wouldn't be suitable in this instance as it needs user intervention to be closed.

HTH

DominicB

 

[DominicB]

Hi jts2004

And try this trick to speed up your macro. Make the first line after the Sub() statement:

Application.ScreenUpdating=False

and this directly before the End() statement:

Application.ScreenUpdating=True
HTH

DominicB

 

[Greg Truby]

...Userform1.Show...

Needs small edit...

    UserForm1.Show vbModeless

otherwise code will still hang, awaiting user input.

 

[DominicB]

Whoops!!!!!

Thanks for that Greg!

DominicB

 

[Greg Truby]

NP. Now, let's see if jts understood your first post and was able to implement it. :wink:

 

[jts2004]

It works fine

Thanks