Hi
I've problems with modeless userforms. Whenever I put in
 Userform1.Show

Note: the form has a label with a "please wait" message.

It will show the modeless form with a blanked out (white) message area while another process is running in the background.

Anyone knows what's wrong with it? Or have I missed out something.

are you using the following syntax...

Userform1.show vbmodeless


cheers

Matthew

Hi Matt

Tried the syntax but still no luck. The message area in modless still blanks out when shown. I've tried loading it before showing... but still doesn't work. Any ideas?

Chris

What version of Excel are you using, because versions earlier than 2000 are not able to utilise modeless forms.

Matthew

Excel 2003.

Chris

Hi Chris

Is it possible to export the form and post the *.frm and *.frx files here, alternavely you can email them to me.

Matthew

Hi Matt
I'll email the file to you. Where shall I send it to?

Thanks
Chris

[email protected]

cheers

M

All is now clear.

add the line DoEvents to your code as shown below...


Sub Print_Preview(sAreaStart As String, sAreaEnd As String, sTitleRows As String, sTitleCols As String)
    Dim sTitleRowsCheck, sTitleColsCheck As String
    frmWait.Show vbModeless
    DoEvents
    With ActiveSheet.PageSetup


then you'll find it works. The DoEvents allows the Modeless form to update itself before continuing the rest of the work.



Cheers

Matthew
PS sorry for the wait, i've been a bit busy today.

Excellent. It works perfectly.

Thanks for the tip Matt.

Cheers
Chris