Thema Datum  Von Nutzer Rating
Antwort
24.07.2008 01:22:02 FST
NotSolved
Blau Aw:live Uhr
 24.07.2008 08:03:36 jh
NotSolved

Ansicht des Beitrags:
Von:
jh		 Datum:
24.07.2008 08:03:36		 Views:
991		 Rating:
     
Antwort:
  Ja
Thema:
Aw:live Uhr
Hallo,

man kann so etwas machen, aber besonders empfehlenswert ist es nicht.
Auf die aktuelle Zeit kannst du auch mit der Time-Funktion zugreifen
und das gewünschte Format mit der Format-Funktion einstellen. Der
Excel-Timer ist leicht aus dem Tritt zu bringen - während der Eingabe
in eine Zelle, wenn eine MsgBox oder ein Dialog angezeigt wird, wird
die Zeit in der Zelle nicht aktualisiert. Wenn du es trotzdem tun willst,
diesen Code in den Bereich "DieseArbeitsmappe":

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.OnTime CDate(Worksheets("Tabelle1").Range("A1").Value) _
+ TimeSerial(0, 0, 1), "Zeit", , False
End Sub

Private Sub Workbook_Open()
Worksheets("Tabelle1").Range("A1").Value = Format(Time, "hh:mm:ss")
Application.OnTime Now + TimeSerial(0, 0, 1), "Zeit", , True
End Sub

Und das in ein Modul:

Public Sub Zeit()
Worksheets("Tabelle1").Range("A1").Value = Format(Time, "hh:mm:ss")
Application.OnTime Now + TimeSerial(0, 0, 1), "Zeit", , True
End Sub

Gruß

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
24.07.2008 01:22:02 FST
NotSolved
Blau Aw:live Uhr
 24.07.2008 08:03:36 jh
NotSolved