Create Message Box without buttons

B

Bijl167

Hi,

I'm trying to display a message at the end of a macro. But I want the
messagebox without bottons and it should disappear without the user
having to take any action.

I've seen these boxes before in f.i. windows but I can't get them to
work in Excel

Does anyone know how this can be solved in VBA?

thnx
 
D

Don Guillett

Here is one I found awhile back. Modify to suit
Sub TimedMessage()
Const Title As String = "Self closing message box"
Const Delay As Byte = 2 'Seconds to Display
Const wButtons As Integer = 16 ' Boutons + icone
Dim wsh As Object, msg As String
Set wsh = CreateObject("WScript.Shell")
msg = Space(10) & "Bonjour," & vbLf & vbLf & "Nous sommes le " & Date
wsh.Popup msg, Delay, Title, wButtons
Set wsh = Nothing
End Sub
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top