Einzelnen Beitrag anzeigen
  #6  
Alt 07-02-2005, 12:41
Benutzerbild von Sven
Sven Sven ist offline
Tech-Admin

 
Registriert seit: Dec 2000
Ort: Neuss
Beiträge: 37.844
Sven ist ein C...
OL Nick: xysvenxy
Style: cncboard
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
Allerdings wird der Benutzer das abfangen können in dem er die Makros deaktiviert.
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:
Wir sind im Augenblick dabei, zu prüfen, ob es im öffentlichen Interesse liegt, ihnen mitzuteilen, ob wir die Informationen haben, die Sie erbitten, und ob es, sollte das der Fall sein, im öffentlichen Interesse liegt, Ihnen diese Informationen zur Verfügung zu stellen.

Geändert von Sven (07-02-2005 um 12:44 Uhr).
Mit Zitat antworten