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

Application.Wait

Forumthread: Application.Wait

Application.Wait
02.03.2005 15: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
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Application.Wait
02.03.2005 15:42:25
AndréL.
Application.OnTime Now + TimeValue("00:00:03"), "DeinLabel"
Gruß
AndréL.
AW: Application.Wait
02.03.2005 16:33:37
Torsten
Hallo,
funktioniert leider nicht...
Werd mal weiterprobieren.
Grüße, Torsten
AW: Application.Wait
02.03.2005 17: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
Anzeige
AW: Application.Wait
02.03.2005 17:42:07
UweD
Hallo
hast du mal die "ShowModal" Eigenschaft der UF auf False gesetzt?
Gruß UweD
Anzeige
Anzeige
Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.05.2026 13:31:09
14.05.2026 09:50:42
13.05.2026 19:14:18