I need to lock user access and/or display a "Please Wait" message while a macro runs.
The macro gathers info from several sheets and can take up to 20-30 seconds to run. Any help would be appreciated.
AT THE START OF MACRO:
Application.Cursor = xlWait ' Smoothes out the macro execution
CaptionSave = ActiveWorkbook.Windows(1).Caption ' Saves heading at top of screen
ActiveWorkbook.Windows(1).Caption = "Doin my thing, please wait . . . ."
AT THE END OF MACRO:
ActiveWorkbook.Windows(1).Caption = CaptionSave ' Put caption back
Application.Cursor = xlDefault
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.