Clever-Excel-Forum

Hallo an die Gemeinde,

ich habe eine Datei, in der die Uhrzeit alle 5 Sekunden per Makro aktualisiert wird.

Sub Uhrzeit()

'Uhrzeit

ThisWorkbook.Worksheets("komplett").Range("H17") = Format(Now, "hh:mm:ss")
ET = Now + TimeValue("00:00:05")
Application.OnTime ET, "Uhrzeit"

End Sub

Jetzt habe ich beim schließen der Datei unregelmäßig eine Fehlermeldung bekommen,
das im Haltemodus das gestartete

Private Sub Workbook_Open()

'Uhrzeit

Uhrzeit

'Sheet

Sheets("komplett").Select

End Sub

bei Sheets("komplett").Select nicht im Haltemodus ausgeführt werden kann.

ich bin über jeden Vorschlag mehr als Dankbar, ihr Profis.

Danke Ron

Hi

Bei der Verwendung von OnTime ist insbesondere das abschalten wichtig. Ich denke das dein Versuch in WorkbookClose da nicht klappt.
Schau mal Hier.
Online - Excel Programmierung VBA Makro: Applicaton.OnTime - Zeitgesteuerte Makros

Ob das dein Problem/Frage beantwortet wird sich zeigen.

Gruß Elex

Hallo Ron,

das nachfolgende Makro in "DiesArbeitsmappe", dann wird Application.OnTime ET, "Uhrzeit", beim schließen der Arbeitsmappe beendet.

Code:
Private Sub Workbook_BeforeClose(Cancel As Boolean)

    On Error Resume Next

    Application.OnTime ET, "Uhrzeit", , False

End Sub

Wenn nicht, aktivierst du die Tabelle, in welcher das Makro steht, vor der Zeile On Error Resume Next.

Danke euch beiden !!!
Hat beides funktioniert.

Gruß Ron

Hallo Ron,

Danke für deine Rückmeldung.

BrianMolko1980

Elex

hddiesel

BrianMolko1980

hddiesel