Here is one option.

____________________________________

On Error Resume Next
Set objExpl = CreateObject("InternetExplorer.Application")
With objExpl
.Navigate "about:blank"
.Toolbar = 0
.StatusBar = 0
.Width = 400
.Height = 100
.Visible = 1
.Document.Title = "Status"
.Document.Body.InnerHTML = "Be patient, subroutine may take a few
minutes"
End With

' Run some code
'For testing, you can skip the two lines below and manually quit IE.

objExpl.Quit
Set objExpl = Nothing
_____________________________________

Steve



"Claus Højlund" wrote in message
...
Is it possible to have a MsgBox without OK or cancel, simply telling what
is
going on? I want to use it with a macro that takes a while, so for the
user
it would be nice to know that everything is ok and the machine is working
hard and so on. I can't find such a VBA command. Can anyone help?