In diesem Artikel zeigen wir Ihnen einen interessanten Trick, um ein zukünftiges oder vergangenes Datum über VBA-Codes in Ihr Word-Dokument einzufügen.
Im Allgemeinen haben wir keine Schwierigkeiten, ein aktuelles Datum in unser Word-Dokument einzufügen. Ab und zu könnten wir uns jedoch auf das Dokument vorbereiten, das nächste Woche oder Monat oder sogar später benötigt wird. Dann ist hier das Problem, das Sie nicht umgehen können. Wie können Sie ein zukünftiges Datum in die Word-Datei einfügen? Und manchmal wie wäre es sogar mit einer Vergangenheit?
Wir sind daher der Meinung, dass Sie diese nützliche Methode verstehen müssen, um Ihre Arbeitsaufgaben besser erfüllen zu können.
Verwenden Sie VBA-Codes, um eine Zukunft oder ein Einfügedatum einzufügen
- Öffnen Sie zunächst Ihr Word-Dokument.
- Klicken Sie dann auf die Registerkarte "Entwickler".
- Klicken Sie anschließend auf "Visual Basic", um den VBA-Editor zu öffnen. Wenn die Registerkarte "Entwickler" in Ihrer Word-Multifunktionsleiste nicht verfügbar ist, können Sie stattdessen "Alt + F11" drücken, um den Editor zu öffnen.
- Klicken Sie nun im Editor auf der linken Seite auf "Normal".
- Klicken Sie dann in der Symbolleiste auf "Einfügen".
- Als nächstes wählen Sie "Modul" aus dem Listenmenü.
- Doppelklicken Sie nun auf das neu eingefügte Modul. Der Bearbeitungsbereich soll auf der rechten Seite verfügbar sein.
- Fügen Sie dort einfach die folgenden Codes ein:
Sub InsertFutureOrPastDate()
Dim strNumberOfDays As String
' Input the number of days you want to insert from today to the future or past date.
strNumberOfDays = InputBox("Please input the number of days you want to insert", "future or past date", "Input here.For exemple,input 1 to insert the date of tomorrow")
' Insert the future or past date according to the inputed number of days
If strNumberOfDays <> "" Then
Selection.TypeText Text:=Format(Date + strNumberOfDays, "dddd, MMMM dd, yyyy")
End If
End Sub
- Klicken Sie anschließend auf die Schaltfläche „Speichern“ und schließen Sie den VBA-Editor.
- Wechseln Sie nun zurück zum Word-Dokumentbildschirm und platzieren Sie den Cursor an der Stelle, an der sich das zukünftige oder vergangene Datum befindet.
- Klicken Sie dann erneut auf die Registerkarte "Entwickler".
- Klicken Sie in der Gruppe "Code" auf "Makros", um das Fenster "Makros" zu öffnen. Wenn die Registerkarte "Entwickler" nicht angezeigt wird, müssen Sie nur "Alt + F8" drücken.
- Suchen Sie nun im Fenster "Makros" das Makro "InsertFutureOrPastDate" und wählen Sie es aus.
- Klicken Sie anschließend auf "Ausführen".
- Dann werden Sie von einem Meldungsfeld begrüßt. Sie können eine Zahl in das Textfeld am unteren Rand des Felds eingeben, um die Tage darzustellen, die bis zum zukünftigen Datum verbleiben. Wenn Sie beispielsweise das Datum von morgen einfügen möchten, sollten Sie dort "1" eingeben. Wenn Sie ein vergangenes Datum benötigen, fügen Sie einfach ein Minuszeichen vor dem Wert hinzu, z. B. "-1" für gestern.
- Denken Sie daran, auf "OK" zu klicken.
Hinweis: In den Codes "Selection.TypeText Text: = Format (Datum + strNumberOfDays," TTTT, MMMM TT, JJJJ ")" repräsentiert "TTTT, MMMM TT, JJJJ" das Datumsformat, wobei "M" für "Monat" steht. , "D" für "Tag", "y" für "Jahr" und "dddd" für "Woche", sodass Sie es nach Belieben ändern können.
Gewinnen Sie Ihre wertvollen Dateien zurück
Word ist anfällig für Zusammenbrüche, wodurch unsere Word-Dateien in Gefahr geraten. Hin und wieder sind einige unserer unschätzbaren Daten einfach weg. Aber was weg ist, ist nicht ganz weg. Sie können sitzen, um über den Verlust Ihrer kritischen Dateien zu klagen, oder Sie können einen kompetenten auswählen beschädigtes Word-Wiederherstellungstool um sie abzurufen.
Einführung des Autors:
Vera Chen ist eine Datenrettungsexpertin in DataNumen, Inc., das weltweit führend bei Datenwiederherstellungstechnologien ist, einschließlich Problembehebung bei Excel XLS-Dateien und pdf Reparatur von Softwareprodukten. Für weitere Informationen besuchen Sie www.datanumen.com €XNUMX