Create Message Box without buttons

  • Thread starter Thread starter Bijl167
  • Start date Start date
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
 
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
 
Back
Top