Zeitgesteueretes Macro
04.09.2017 23:49:08
stef26
ich hab da mal eine Frage zu zeitgesteuerten Macros.
Public Sub StartZeitGeber()
Sheets("Autostart").Range("A1").Value = 1
startAutoMakro = Now + TimeValue("00:01:00")
Application.OnTime startAutoMakro, "AutoMakroSt"
startEinmalig = TimeValue("23:35:00")
Application.OnTime startEinmalig, "Einmalig"
End Sub
Private Sub AutoMakroSt()
Sheets("Datenholen").Cells(Rows.Count, "A").End(xlUp).Offset(1).Value = Format(Now, "hh:nn:ss") _
startAutoMakro = Now + TimeValue("00:01:00")
Application.OnTime startAutoMakro, "AutomakroSt"
End Sub
Leider funktioniert das nicht mit den übliche Bezug auf das Tabellenblatt:
startAutoMakro = Now + TimeValue(Sheets("Setup").Range("B17").value)
Hat jemand ne Idee wie ich das lösen könnte, oder geht das in diesen Fall gar nicht?
Gruß
Stefan