Progress Indicator, e.g. Non-modal MsgBox

[Dennis W. Bulgrien]

For a macro that contains a sequence of time-intensive queries, does anybody
have a slick way of displaying the progress of it? I'd like to know which step
of the Macro its working on. MsgBox isn't acceptable because it requires
intervention to continue. I'd like a non-modal message box that I could print
messages to. Using Echo Off one can print a message in the status bar but one
must watch the bar carefully so as not to miss it between the query progress
bars.

 

[Steve Schapel]

Dennis,

There are various third-party progress bars or meters available.
However, a relatively simple solution is to use a little unbound form
with an unbound textbox on it. Set its Popup and Modal properties to
Yes, and open it in the first action of your macro. Then, after every
other action in the macro, use a SetValue action to update the display
in the textbox to whatever you like, e.g. "1st query finished" or "20%
completed", or if you want to emulate a progress bar type of
functionality, set the textbox's font to Terminal and use an expanding
series of Û characters to make a block display.

- Steve Schapel, Microsoft Access MVP

 

[Dennis W. Bulgrien]

One can do it without creating a form. Insert RunCode items in the macro that
call a function which writes to the modeless Debug object window.

Function DebugStep(ByVal s As String) As Integer
Debug.Print Now; " "; s
End Function

"Dennis W. Bulgrien" <dbulgrien vcsd com> wrote in message
....a slick way of displaying the progress...
I'd like a non-modal message box that I could print
messages to....