Steuerelement TextBox

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
TextBox


Excel-Version: 8.0 (Office 97)
nach unten

Betrifft: Steuerelement TextBox
von: Michael
Geschrieben am: 31.05.2002 - 22:12:33

Hallo
Wenn ich in einer Tabelle aus der Steuerelement-Toolbox eine
TextBox nehme und ich will dort die laufende Uhrzeit anzeigen
wie mach ich das und wohin schreib ich dies.
Anfänger VBA-Kenntnisse vorhanden.

Mit bestem Dank im vorraus


nach oben   nach unten

Würde ich nicht tun,...
von: Rainer
Geschrieben am: 01.06.2002 - 01:01:09

Hallo Michael,

... du belastest EXCEL mit einer kontinuierlichen Aufgabe und kannst kaum noch vernünftig arbeiten, weil das Makro in einer Endlosschleife läuft.
Du kannst zwar mit "DoEvents" in der Schleife Benutzereingaben abfangen, aber eben nur jede Sekunde. Alle anderen Aufgaben müssen sich dem Makro unterordnen

Ein Ansatz:

Private Sub TextBox1_Change()
Timerstart:
Me.TextBox1.Value = Format(Now(), "hh:mm:ss")
Application.Wait (Now() + TimeValue("00:00:01"))
DoEvents
GoTo Timerstart:
End Sub

nach oben   nach unten

Re: Würde ich nicht tun,...
von: L.Vira
Geschrieben am: 02.06.2002 - 01:04:46

Wenn du das mit wait machst, kannst du überhaupt nicht mehr mit Excel arbeiten, eh das Makro beendet wird. Wenn schon dann mit Application.OnTime

 nach oben

Beiträge aus den Excel-Beispielen zum Thema "Steuerelement TextBox"