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

UserForm Uhr

Forumthread: UserForm Uhr

UserForm Uhr
09.05.2003 19:40:42
Andy
Hallo
Wie kann ich in einer UserForm eine Uhrzeit einbinden die weiterläuft.
Gruss Andreas

Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: UserForm Uhr
09.05.2003 19:50:53
Nepumuk

Hallo Andreas,
in das Modul der Userform

Private Sub UserForm_Activate()
    Application.OnTime Time + TimeSerial(0, 0, 1), "Uhr"
End Sub

Private Sub UserForm_Terminate()
    On Error Resume Next
    Application.OnTime Time + TimeSerial(0, 0, 1), "Uhr", , False
End Sub

in ein normales Modul

Public Sub Uhr()
    UserForm1.Label1.Caption = Format(Time, "hh:mm:ss")
    Application.OnTime Time + TimeSerial(0, 0, 1), "Uhr"
End Sub

Gruß
Nepumuk

Anzeige
Re: UserForm Uhr
09.05.2003 21:39:57
udo

Hi , hab dir ein Beispiel an deine email geschickt

Gruß udo

;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige