User form/ to show please wait

Any help please?

I want to add into a macro a userform or something so that when the macro is
started a little notice appears saying "Please Wait" or something and stays
on for the duration of the macro and then closes automatically at the end of
the macro? when i try putting in a show aznd then a hide it opens and waits
for a response, any help please,

Many thanks,

Andy

In the properties for the userform, Change the ShowModal to False.

- Mangesh

Make it non modal

Userform1.show vbModeless
--
Regards,
Tom Ogilvy

"Momo" <[email protected]> wrote in message
news:[email protected]...
> Any help please?
>
> I want to add into a macro a userform or something so that when the macro
is
> started a little notice appears saying "Please Wait" or something and
stays
> on for the duration of the macro and then closes automatically at the end
of
> the macro? when i try putting in a show aznd then a hide it opens and
waits
> for a response, any help please,
>
> Many thanks,
>
> Andy

A simpler method, but effective is to show an empty area of the sheet with a
message in a cell while the macro runs.

Sub Wait()
ActiveSheet.Range("DN10").Value = "Please Wait..."
Range("DN9").Activate
Application.ScreenUpdating = False
'Your routine Here
Range("DN10").Clear
Application.ScreenUpdating = True
Range("A1").Select
End Sub

Mike F

"Momo" <[email protected]> wrote in message
news:[email protected]...
> Any help please?
>
> I want to add into a macro a userform or something so that when the macro
> is
> started a little notice appears saying "Please Wait" or something and
> stays
> on for the duration of the macro and then closes automatically at the end
> of
> the macro? when i try putting in a show aznd then a hide it opens and
> waits
> for a response, any help please,
>
> Many thanks,
>
> Andy

Thanks tom, this seems to work, just one thing, how do i get the userform to
then close once the macro has finished?

Thanks

andy

Tom, I have now got it to close at the end of the macro, just wondering if
there is any way of removing the close option when the window pops up, the
little x in the corner,

thanks

Andy

Unload Userform1 at the end of your code

--
Regards,
Tom Ogilvy

"Momo" <[email protected]> wrote in message
news:[email protected]...
> Thanks tom, this seems to work, just one thing, how do i get the userform
to
> then close once the macro has finished?
>
> Thanks
>
> andy
>
>

Use the queryclose event to cancel the attempt.

http://support.microsoft.com/default...b;en-us;213713
XL2000: Preventing UserForm from Being Dismissed with Close Button

works with all versions of excel that support userforms.

--
Regards,
Tom Ogilvy



"Momo" <[email protected]> wrote in message
news:[email protected]...
> Tom, I have now got it to close at the end of the macro, just wondering if
> there is any way of removing the close option when the window pops up, the
> little x in the corner,
>
> thanks
>
> Andy
>
>

I put userform1.hide at the end, is that the way to do it? it got rid of it

I would suggest unloading it:

Unload Userform1 at the end of your code

--
Regards,
Tom Ogilvy

--
Regards,
Tom Ogilvy

"Momo" <[email protected]> wrote in message
news:[email protected]...
> I put userform1.hide at the end, is that the way to do it? it got rid of
it

Tom,

one last thing,

when i now run my macro the user form appears, but the label which i have
written the text appears as a white empty box, is this because of the
vbmodeless?
if so am i better just to write what i want as the title of the form?

thanks,

Andy

Userform1.show vbModeless
doevents

.. . .

Unload Userform1

--
Regards,
Tom Ogilvy



"Momo" <
[email protected]> wrote in message
news:[email protected]...
> Tom,
>
> one last thing,
>
> when i now run my macro the user form appears, but the label which i have
> written the text appears as a white empty box, is this because of the
> vbmodeless?
> if so am i better just to write what i want as the title of the form?
>
> thanks,
>
> Andy

I know this is an old thread, but am hoping someone can help.
I created an user-form (pop-up1), and used this

Userform1.show vbModeless
doevents

..My code here..

Unload Userform1

but I have a problem while running my code.
After a little while pop-up1 disappears completely, only to reappear as popup2 without the the red banner and text.
The code does continue.
If I remove the Unload code popup1 will reappear at the end of my code.

I tried to include Application.ScreenUpdating = False at the beginning of the code, but that's not it.

Can anyone help me to solve this problem?

Hi,
I had the same problem. I have a "Please Wait" textbox in a userform that pops up upon workbook opens. There was delay a second or two between the window and the textbox appearance.
My solution is:
Userform1.show vbModeless
Userform1.repaint