Excel VBA -> zeitliches Fenster

Dieses Thema im Forum "Office-Programme" wurde erstellt von Angel-HRO, 11. Juni 2002.

Status des Themas:
Es sind keine weiteren Antworten möglich.
  1. Angel-HRO

    Angel-HRO Megabyte

    Registriert seit:
    31. August 2000
    Beiträge:
    2.524
    Ich möchte beim Öffnen eines Excel Dokumentes für ca 5 Sekunden eine MsgBox einblenden, die entweder per Klick oder automatisch nach den 5 Sekunden verschwindet. Lässt sich das irgendwie realisieren?

    Danke schopn
     
  2. Angel-HRO

    Angel-HRO Megabyte

    Registriert seit:
    31. August 2000
    Beiträge:
    2.524
    Klasse,
    vielen Dank. Funzt wunderbar

    Gruß
    Andre
     
  3. Cerveau

    Cerveau ROM

    Registriert seit:
    22. April 2002
    Beiträge:
    5
    Hallo Angel-HRO,

    Mit einer Userform ist das möglich.
    Zuerst eine neue Userform erstellen und in TestForm umbenennen, dann folgenden code eingeben(F7 drücken):
    Private Sub UserForm_Activate()
    Application.OnTime Now + TimeValue("00:00:05"), "CloseForm"
    End Sub
    Nun ein neues Modul erstellen und folgenden code eingeben:
    Sub CloseForm()
    Unload TestForm
    End Sub

    Sub OpenForm()
    TestForm.Show
    End Sub

    Zum Schluss in Arbeitsmappe_öffnen diesen code:
    Private Sub Workbook_Open()
    Call OpenForm
    End Sub

    Die Namen können nach belieben geändert werden.

    Falls interesse kann ich dir eine Beispieldatei schicken.

    PS:ich benutze ein englisches Excel , kann dir also nicht sagen wie die deutschen Texte heissen.

    Cerveau
     
Status des Themas:
Es sind keine weiteren Antworten möglich.

Diese Seite empfehlen