VBA-Programmierung in Microsoft Excel

Tutorial: Excel-Beispiele

Anzeigen einer UserForm für den Zeitraum von 5 Sekunden

Gruppe

Dialog

Bereich

UserForm

Thema

Anzeigen einer UserForm für den Zeitraum von 5 Sekunden

Problem

Wie kann ich eine UserForm für den Zeitraum von 5 Sekunden anzeigen lassen?

Lösung

Geben Sie den nachfolgenden Code in das Klassenmodul der UserForm ein.




ClassModule: frmMsg

Private Sub UserForm_Activate()
   Application.Wait Now + TimeSerial(0, 0, 5)
   Unload Me
End Sub

StandardModule: basMain

Sub CallForm()
   frmMsg.Show
End Sub

    


Beiträge aus dem Excel-Forum zu den Themen Dialog und UserForm