ich hab hier ein kleines Makro Problem
Ich möchte in meiner Tabelle gerne die laufende Uhrzeit angezeigt bekommen. Dazu habe ich diese Dateien gefunden und in den entsprechenden Bereichen eingefügt.
MAKRO:
Diese Arbeitsmappe (Allgemein)
Option Explicit
Private Sub Workbook_Open()
Zeitmakro
End Sub
Private Sub Workbook_BeforeClose(Cancel As Boolean)
On Error Resume Next
Application.OnTime EarliestTime:=ET, Procedure:="Zeitmakro", Schedule:=False
End Sub
Modul Allgemein:Option Explicit
Public ET As Variant
Sub Zeitmakro()
' unter Anleitung von KlauCh
ThisWorkbook.Worksheets("Tabelle1").Range("A1") = Format(Time, "hh:mm:ss")
ET = Now + TimeValue("00:00:01")
Application.OnTime ET, "Zeitmakro"
End Sub
In meiner Tabelle sind aber schon Einträge in " Diese Arbeitsmappe (Allgemein)" enthalten.
Hier steht schon das drin:
Option Explicit
Private Sub Workbook_Open()
Application.Goto Worksheets("Hauptseite").Range("C5")
MsgBox "Bitte aktualisieren Sie zuerst die Daten in den gelben Feldern, bevor Sie weiter _
arbeiten!", vbOKOnly + vbInformation, "Wichtiger Hinweis"
End Sub
Wenn ich dann den Uhrzeitcode einfüge, bekomme ich immer eine FehlermeldungFehler beim Kompilieren:
Mehrdeutiger Name: Workbook_Open
Ich hab nach diesem Begriff schon einiges gelesen, aber wirklich hilfreich war das nicht!
Nun hoffe ich auf eure Hilfe....
HANS