Messagebox verschwindet nicht automatisch
11.03.2009 11:31:19
Thomas
ich möchte das eine Messagebox automatisch nach x Sek. verschwindet.
Die beiden Standardlösungen hab ich auch gefunden.
Leider funktioniert das mit dem verschwinden nicht.
Public Sub test()
Dim objShell As Object
Set objShell = CreateObject("WScript.Shell")
objShell.Popup "Hallo", 2, "Info"
Set objShell = Nothing
End Sub
Bis jetzt konnte ich nur herausfinden das der Code bei vielen funktioniert und bei einigen nicht.
Woran das liegt konnte ich allerdings nicht hier im Forum ermitteln.
Vieleicht stelle ich aber auch nur in der Suchfunktion die falschen Keywords ein?!