I would like to display a window stating "Please wait..."  while my macro is running.  What is the simplest way to do this?

Sub main ()

delcarations

pleasewait.show

code to be performed here

pleasewait.hide

End sub