Try this

Sub abc()
' run with alt-F8
Dim a

'Application.ScreenUpdating = False

MsgBox ("Move me away from the centre of the screen")

Application.ScreenUpdating = False
For i = 1 To 100
a = 1
Next i
MsgBox ("done")
Application.ScreenUpdating = True
End Sub

Regards,
Peter T


"JLGWhiz" wrote in message
...
Hi Peter, In the version of xl03 that I am running, the msgbox goes
away, whether or not ScreenUpdating is enabled. Is it different in xl07 +
?


"Peter T" <peter_t@discussions wrote in message
...
What you describe cannot and occur. I very much doubt you actually tested
the code you posted as an example, at least not exactly as written and
with nothing else.

My guess is you are showing the msgbox with screenupdating disabled. The
msgbox will stay on the screen indefinitely until the screen is refreshed
(even DoEvents) or by re-enabling screenupdating.

Be sure to temporarily disable screenupdating if/as necessary when
showing a msgbox.

Regards,
Peter T

The only thing that
"John Keith" wrote in message
...
Is this a message box that was created with a UserForm?

No

The standard message box automatically closes when a button is clicked.
If it is the
standard message box and is not closing, there could be a software
problem
in your system. Is this in Excel, if so, what version.

Excel 2007/WinXP

The message box window stays open until the next msgbox command is
executed.

I also just tried the following

msgbox("Test")
for i =1 to 100000000
a=1
next i
msgbox("done")

The loop has not completed yet and the first message box is still
open.





John Keith