message box zonder ok knop die na 2 seconden weer verdwijnt

Status
Niet open voor verdere reacties.

Doohan

Gebruiker
Lid geworden
20 mrt 2012
Berichten
374
Beste Helper,

Is het mogelijk om een msgbox zonder ok knop te maken die na 2 seconden weer verdwijnt. Ik heb nu deze code maar dit is gewoon met OK knop
Code:
Private Sub Workbook_Open()
    Sheets("Blad1").Select
    Call MsgBox("Welkom: " & Application.UserName _
        & vbCrLf & "" _
        & vbCrLf & "U opent het EngineeringBook van xxx xx xxxx" _
        & vbCrLf & "" _
        & vbCrLf & "Het gebruik van deze software is voor eigen verantwoording!!" _
                , vbInformation, "Welkom")
                
    frmMainMenu.Show
End Sub

Alvast vriendelijk dank
 
Dank je Edmoor.
Dat bedoel ik.
Ik ga kijken dit nu in te passen bij mijn projectje
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan