HERBERS
Excel-Forum
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Application.Wait

Application.Wait
02.03.2005 14:16:00
Torsten
Hallo,
Wenn ich in einem Ablauf einer Prozedur einen Meldung generiere, dann schreibe ich diese auf ein Label in eine sichtbare UF. Dieses Label zeigt z.B. den Text "Keine Daten vorhanden" und soll nach 3 sec wieder verschwinden. Das Makro läuft danach weiter
Mit Applictaion.Wait stoppt allerdiungs die ganze Prozedur (Sanduhr) und läuft dann erst weiter. Wie erreiche ich dass die Meldung in der UF aufleuchtet und nach 3 sec wieder verschwindet und gleichzeitig das Makro weiter abgearbeitet wird.
Ich möchte keine MsgBox verwenden als Alternative.
Nen schönen Gruss,
Torsten

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Benutzer
AW: Application.Wait
02.03.2005 14:42:25
AndréL.
Application.OnTime Now + TimeValue("00:00:03"), "DeinLabel"
Gruß
AndréL.
AW: Application.Wait
02.03.2005 15:33:37
Torsten
Hallo,
funktioniert leider nicht...
Werd mal weiterprobieren.
Grüße, Torsten
AW: Application.Wait
02.03.2005 16:55:10
Nepumuk
Hallo Torsten,
1. Zeige das Userform nichtmodal an.
UserForm1.Show False
2. Im Userform hast du folgenden Code:


Option Explicit
Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
Private Sub UserForm_Activate()
    Sleep 3000
    Unload Me
End Sub


Gruß
Nepumuk
AW: Application.Wait
02.03.2005 16:42:07
UweD
Hallo
hast du mal die "ShowModal" Eigenschaft der UF auf False gesetzt?
Gruß UweD

Links zu Excel-Dialogen

Meistgelesene Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Ihre Stimme zählt!