5
Fehler bei Zeitmakro (Uhrzeit soll automatisch jede Minute aktualisiert werden)
Hallo Zusammen,
verwende eine Makro um jede Minute meine Zeitangabe automatisch aktualisieren zu lassen.
Meine Eingabe in Visual Basic:
Sub Zeitmakro()
ThisWorkbook.Worksheets("Tabelle1").Range("M2") = Format(Now, "hh:mm")
ET = Now + TimeValue("00:01:00")
Application.OnTime ET, "Zeitmakro"
End Sub
Darauffolgende Fehlermeldung:
Index außerhalb des gültigen Bereichs
Was ist mein Fehler? Weiß leider nicht weiter?
Habt ihr Tipps&Tricks für mich?
Danke.
Gruß
Dom
verwende eine Makro um jede Minute meine Zeitangabe automatisch aktualisieren zu lassen.
Meine Eingabe in Visual Basic:
Sub Zeitmakro()
ThisWorkbook.Worksheets("Tabelle1").Range("M2") = Format(Now, "hh:mm")
ET = Now + TimeValue("00:01:00")
Application.OnTime ET, "Zeitmakro"
End Sub
Darauffolgende Fehlermeldung:
Index außerhalb des gültigen Bereichs
Was ist mein Fehler? Weiß leider nicht weiter?
Habt ihr Tipps&Tricks für mich?
Danke.
Gruß
Dom
Share on Facebook
Share on Twitter
Share on Reddit
Share on LinkedinPlease also mark the comments that contributed to the solution of the article
Content-Key: 249436
Url: https://administrator.de/contentid/249436
Printed on: April 19, 2024 at 23:04 o'clock
5 Comments
Latest comment
Hallo Dom,
Das setzen eines Breakpoints im VBA Editor sollte hier Klarheit bringen !
Grüße Uwe
p.s. Bitte nutze Code-Tags für deinen Quellcode:
- liegt die Prozedur überhaupt in einem Modul, oder im Codeabschnitt eines Worksheets ?
- Existiert das Worksheet Tabelle1 ?
Das setzen eines Breakpoints im VBA Editor sollte hier Klarheit bringen !
Grüße Uwe
p.s. Bitte nutze Code-Tags für deinen Quellcode:
<code> Quellcode </code>. Merci.
Hi uwe,
also die oben genannte Fehlermeldung kommt nicht mehr. (Hab das Worksheet falsch benannt.)
Die Prozedur liegt im Codeabschnitt
Nun aktualisiert mir die zeit allerdings nicht automatisch, sondern nur wenn ich per maus im vb-editor ausführen klicke.
jetzt kommt eine Fehlermeldung ich hätte meine makros deaktiviert. hab aber nachgeschaut. die sind aktiv. die makro existiert auch in dieser Arbeistmappe.????
8-O
Zur Info....
Aktueller Eintrag lautet nun so:
Sub Zeitmakro()
ThisWorkbook.Worksheets("Inbound-Gate-Tool").Range("M2") = Format(Now, "hh:mm")
ET = Now + TimeValue("00:01:00")
Application.OnTime ET, "Zeitmakro"
End Sub
also die oben genannte Fehlermeldung kommt nicht mehr. (Hab das Worksheet falsch benannt.)
Die Prozedur liegt im Codeabschnitt
Nun aktualisiert mir die zeit allerdings nicht automatisch, sondern nur wenn ich per maus im vb-editor ausführen klicke.
jetzt kommt eine Fehlermeldung ich hätte meine makros deaktiviert. hab aber nachgeschaut. die sind aktiv. die makro existiert auch in dieser Arbeistmappe.????
8-O
Zur Info....
Aktueller Eintrag lautet nun so:
Sub Zeitmakro()
ThisWorkbook.Worksheets("Inbound-Gate-Tool").Range("M2") = Format(Now, "hh:mm")
ET = Now + TimeValue("00:01:00")
Application.OnTime ET, "Zeitmakro"
End Sub
Die Prozedur liegt im Codeabschnitt
falsch, lege sie in ein Modul, dann läuft diese wie gewünscht. Oder wenn der Code weiterhin in deinem Codeabschnitt liegen soll, schreibst du für den Makroaufruf in der Ontime Prozedur den Namen des Codeabschnitts davor.Wenn dein Code also im Abschnitt DieseArbeitsmappe liegen sollte lautet der Aufruf so
Application.OnTime ET, "DieseArbeitsmappe.Zeitmakro"
Private Sub Workbook_Open()
Zeitmakro
End Sub
Ich probier es mal aus.
vielen dank uwe für deine geduld und hilfe.
hat funktioniert.
hat funktioniert.
