Flash Screen/Timeout msg box
 

Hi,

I would like to create a flash screen window/message box/popup window
which will close close automatically after specified time, how do I
create it give me a basic idea.

Thanks and Regards
Kiran

Flash Screen/Timeout msg box
 

See http://www.xldynamic.com/source/xld.xlFAQ0007.html

--
---
HTH

Bob

(there's no email, no snail mail, but somewhere should be gmail in my addy)



"kiran kumar" wrote in message
oups.com...
Hi,

I would like to create a flash screen window/message box/popup window
which will close close automatically after specified time, how do I
create it give me a basic idea.

Thanks and Regards
Kiran

Flash Screen/Timeout msg box
 

Hi,

Use OnTime function:
'place this code behind userform1
Private Sub UserForm_Activate()
Application.OnTime Now + TimeValue("00:00:02"), "CloseMsg"
End Sub

'place this code behind standard module:
Sub CloseMsg()
Unload UserForm1
End Sub

then run UserForm1 will close in 2 second after activate

--
Regards,

Halim



"kiran kumar" wrote:

Hi,

I would like to create a flash screen window/message box/popup window
which will close close automatically after specified time, how do I
create it give me a basic idea.

Thanks and Regards
Kiran