It shouldn't do. The code in the 'loadit' macro should look something like

Public Sub loadit()

'the code to open the word document

Unload Userform1

End Sub

What does yours look like?

--

HTH

RP
(remove nothere from the email address if mailing direct)


wrote in message
oups.com...
thanks bob, although the userform will still only appear for 1 sec, it
disapears after that and i am still waiting for the doc to load

regards

johny
Bob Phillips wrote:
Johnny,

Try this.

Build a little userform that says that the doc is loading
In the form Userform_Activate, add the following code

Private Sub UserForm_Activate()
Application.OnTime Now + TimeValue("00:00:01"), "loadit"
End Sub

where loadit is the name of another macro that opens the Word doc.
Also in
that macro, add the line

Unload Userform1

at then end.

Not too much visual feedback, but something.


--
HTH

Bob Phillips

wrote in message
oups.com...
Hi,

I have some code that executes a hyperlink to open a word document
on a
server. The code executes in secs, however thedoc takes a long
time to
open. I have all the latest info on progress bars but this is not
working for me. i need to display a message until the word doc
opens, i
can display a message based on time i.e display the mssage for 5
secs,
but the document take a variable lenght of time to open, so i need
the
program to select the hyperlink display a message until the
document is
open and then disapear. hel;p please if this is possible.
regards

Johny5