ich suche eine Möglichkeit, ein Makro aus einer geöffneten Datei Datumsbezogen (also nur Mo-Fr) zu einer bestimmten Uhrzeit laufen zu lassen.
Kennt jemand eine Lösung ?
Danke
Walter
Public Const UhrMacro As String = "MeinMacro"
Public Zeitpunkt As Double
Sub StarteMeinMacro()
Zeitpunkt = DateSerial(2007, 10, 15) + TimeSerial(23, 55, 55)
Application.OnTime earliesttime:=Zeitpunkt, procedure:=UhrMacro, schedule:=True
End Sub
Sub MeinMacro()
msg = MsgBox("Bin pünktlich gestartet")
Call StopMeinMacro
End Sub
Sub StopMeinMacro()
On Error Resume Next
Application.OnTime earliesttime:=Zeitpunkt, procedure:=UhrMacro, schedule:=False
End Sub
Gruss
Klaus K.