Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
576to580
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
576to580
576to580
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
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
Anwender
Anzeige
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
Anzeige
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

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige