ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   waiting message (https://www.excelbanter.com/excel-programming/395693-re-waiting-message.html)

Michael

waiting message
 
You could high the form that covers the screen temporarily, like this:

Userform1.Hide

then show either the progress bar form I submitted on my previous posting or
the status bar on the left bottom of excel as shown on this posting.

--
If this posting was helpful, please click on the Yes button.
Regards,

Michael Arch.




"Scott" wrote:

Thank you, Michael.

The problem is that my program opens up a form that is maximized and cover
the whole screen. So the status bar is underneath my form.


"Michael" wrote:

You could use this one, that displays a percentage of completion on the
bottom left of the excel workbook:
Sub StatusBar()

Dim x As Integer
Dim MyTimer As Double

'Change this loop as needed.
For x = 1 To 250

'Dummy Loop here just to waste time.
'Replace this loop with your actual code.
MyTimer = Timer
Do
Loop While Timer - MyTimer < 0.03

Application.StatusBar = "Progress: " & x & " of 250: " & Format(x /
250, "Percent")
DoEvents

Next x

Application.StatusBar = False

End Sub






--
If this posting was helpful, please click on the Yes button.
Regards,

Michael Arch.




"Scott" wrote:

I want to put a message on top of the form when the program is running, such
as "Please wait while the updating is in the progress.", and the message
will disappear or replaced by another message like "The update is completed."
How to do this?

Your help will be appreciated.

Scott



All times are GMT +1. The time now is 10:33 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com