VBA-Programmierung in Microsoft Excel

Tutorial: Excel-Beispiele

Eingangsbildschirm anzeigen

Gruppe

Dialog

Bereich

UserForm

Thema

Eingangsbildschirm anzeigen

Problem

Wie kann ich beim Öffnen einer Arbeitsmappe einen Stardialog anzeigen lassen, der eine vorzugebende Zeit am Bildschirm verweilt?

Lösung

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




ClassModule: DieseArbeitsmappe

Private Sub Workbook_Open()
   frmSplash.Show
End Sub

ClassModule: frmSplash

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

    


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