Datumsabhängige Makroaktivierung

Computer: Software & Programmierung Office Software
1

Hallo an Alle,

kann ich nach dem Überschreiten eines Datums ein Makro aktivieren.
Ich habe mir gedacht das müsste in Workbook open gehen mit der Abfrage Wenn Datum > … dann call … . Wie sähe solch ein Makro aus ??

Ich war überzeugt meine nächste Frage wurde schon mal beantwortet. Allerdings kann ich die Lösung nicht finden.
Wie kann ich erreichen, dass nach einem Fehler keine Meldung kommt, sondern die Datei ( Exceldatei ) ohne Nachfrage schliesst.

Hintergrund beider Fragen ist, den Zugang zur Tabelle zu erschweren. Zumindest für den fortgeschrittenen Laien.

Im Vorraus schon mal vielen Dank.

Sonnige Grüsse

2

Hi Heiner,

Ich habe mir gedacht das müsste in Workbook open gehen mit der
Abfrage Wenn Datum > … dann call … . Wie sähe solch
ein Makro aus ??

Option Explicit
Private Sub Workbook_Open()
If Date >= DateValue(„01.4.2006“) Then Call xyz
End Sub

Ich war überzeugt meine nächste Frage wurde schon mal
beantwortet. Allerdings kann ich die Lösung nicht finden.
Wie kann ich erreichen, dass nach einem Fehler keine Meldung
kommt, sondern die Datei ( Exceldatei ) ohne Nachfrage
schliesst.

Option Explicit
Sub Copy()
On Error GoTo ende

'…
'dein Code
'…

Exit Sub
ende:
ThisWorkbook.Close False
End Sub

Gruß
Reinhard