Displaying two consecutive userforms as modeless

**jrdx** · 11-16-2009, 03:19 AM

Hi,

I've searched the internet and all my resources for an answer to my problem, but have been unable to figure it out, so I'm starting a thread here.

I want to display two consecutive userforms, both of which serve as simple status messages updating the user on the status of the macro running in the background. Since the macro goes through two phases, I let the user know when it is in each phase with the two userforms.

I display the first userform, let's call it UserForm1, using

UserForm1.Show vbModeless

Then, I unload this userform. However, since sometimes the macro runs too fast to let the user read the message, I used Application.Wait to pause the macro for a second before unloading UserForm1. So far so good. Then, after the first part of the code runs, I display the second userform, let's call it UserForm2, using the same command:

UserForm2.Show vbModeless

However, when I show this one, you can't read the text in it, just the caption. The userform itself is blank, even if I use the wait command. I cannot figure out why this is and how to resolve it so that the text in the second userform is visible.

Any ideas?

Thanks in advance,
jd

**jrdx** · 11-19-2009, 04:14 AM

Can anybody out there help? This is killing me and I've exhausted searching on the internet for some sort of resolution. I know there must be a way ....

Thanks in advance,
jd

**Andy Pope** · 11-19-2009, 05:40 AM

we really need to see your code. Can you create and post a working example that demonstrates the problem.

Can we assume you set the caption of the label on the 2nd form correctly?
Have you tried using a DoEvent command in order to allow the system to process any outstanding instructions.
Or maybe just a repaint of the userform on activate.

**romperstomper** · 11-19-2009, 09:19 AM

I'd definitely go with the Repaint:

With UserForm2
   .Show vbModeless
   .repaint
End With

**jrdx** · 11-20-2009, 02:53 AM

romperstomper: repaint works perfectly and is exactly what I was looking for since it's so simple (I knew there had to be an easy way). Thanks very much.

jd