AW: Makro ab bestimmter Zeit auto. starten
23.04.2009 07:31:28
Rolf
Guten Morgen Hajo,
ich komm einfach nicht weiter(wohl auch aus fehlender Kenntnis).
Zwar habe ich keine Fehlermeldung mehr, das Makro wird trotz-
dem nicht ausgeführt!
DieseArbeitsmappe
Private Sub Workbook_Open()
Dim a As Date
a = CDate("23.04.2009 22:00") 'Termin zur Prüfung
If Now > a And ThisWorkbook.Sheets(1).Range("a1").Value "x" Then Call TestMakro 'Datumsprü _
fung und prüfen, ob Makro schon _
mal abgearbeitet wurde
ThisWorkbook.Sheets(1).Range("a1").Value = "x" 'x in A1 schreiben zur Kontrolle, ob das Makro _
abgearbeitet wurde
End Sub
Modul1
Sub TestMakro()
Worksheets("Tabelle1").Range("c1:c10").Clear
End Sub
Bin für jede Unterstützung Dankbar.
Gruß
Rolf