#6
|
||||
|
||||
In Word?
Mit VBA. Dazu kannst du eine recht einfache Routine benutzen die die Open Funktion verwendet und abfragt ob das gewünschte Datum schon gekommen ist. Code:
Private Sub Document_Open() Dim TheDate As Date ' Declare variables. TheDate = "07.02.05" varx = DateDiff("d", Now, TheDate) If varx > 0 Then MsgBox "Datum nicht erreicht!" ThisDocument.Close End If End Sub Abhilfe kannst du schaffen in dem du, ebenfalls per Makro, den Text zunächst ausblendest - der kann ja dann nur dargestellt werden wenn der Anwender die Frage, ob er die Makros aktivieren will mit 'Ja' beantwortet.
__________________
Zitat:
Geändert von Sven (07-02-2005 um 12:44 Uhr). |