W tym artykule pokażemy ci interesującą sztuczkę, aby wstawić przyszłą lub przeszłą datę do dokumentu Word za pomocą kodów VBA.
Generalnie nie mamy trudności z wstawieniem aktualnej daty do naszego dokumentu Worda. Jednak od czasu do czasu możemy przygotowywać się do potrzebnego dokumentu w przyszłym tygodniu lub miesiącu, a nawet później. Oto problem, którego nie można ominąć. Jak wstawić przyszłą datę do pliku Word? A czasem nawet o przeszłości?
Dlatego uważamy, że musisz zrozumieć tę przydatną metodę, aby lepiej wykonywać swoje zadania.
Użyj kodów VBA, aby wstawić datę przyszłą lub wkleić
- Na początek otwórz dokument programu Word.
- Następnie kliknij zakładkę „Deweloper”.
- Następnie kliknij „Visual Basic”, aby otworzyć edytor VBA. Jeśli karta „Programista” nie jest dostępna na Wstążce programu Word, możesz nacisnąć „Alt + F11”, aby zamiast tego otworzyć edytor.
- Teraz w edytorze kliknij „Normalny” po lewej stronie.
- Następnie kliknij „Wstaw” na pasku narzędzi.
- Następnie wybierz „Moduł” z menu listy.
- Teraz kliknij dwukrotnie nowo wstawiony moduł, a obszar edycji będzie dostępny po prawej stronie.
- Wystarczy wkleić tam następujące kody:
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
- Następnie kliknij przycisk „Zapisz” i zamknij edytor VBA.
- Teraz wróć do ekranu dokumentu programu Word i umieść kursor w miejscu, w którym znajduje się data przyszła lub przeszła.
- Następnie ponownie kliknij kartę „Programista”.
- I kliknij „Makra” w grupie „Kod”, aby otworzyć okno „Makra”. Ponownie, jeśli zakładka „Programista” nie jest wyświetlana, wystarczy nacisnąć „Alt + F8”.
- Teraz w oknie „Makra” znajdź i wybierz makro „InsertFutureOrPastDate”.
- Następnie kliknij „Uruchom”.
- Następnie zostaniesz powitany przez okno wiadomości. Możesz wprowadzić liczbę w polu tekstowym na dole pola, aby przedstawić liczbę dni pozostałych do przyszłej daty. Na przykład, jeśli chcesz wstawić datę jutrzejszą, powinieneś tam wpisać „1”. Podobnie, jeśli potrzebujesz daty przeszłej, po prostu dodaj znak minus przed wartością, na przykład „-1” dla wczoraj.
- Pamiętaj, aby kliknąć „OK”.
Uwaga: W kodach „Selection.TypeText Text:=Format(Date + strNumberOfDays, „dddd, MMMM dd, rrrr”)”, „dddd, MMMM dd, rrrr” reprezentują format daty, gdzie „M” oznacza „miesiąc” , „d” oznacza „dzień”, „y” oznacza „rok” i „dddd” oznacza „tydzień”, więc możesz go dowolnie zmieniać.
Odzyskaj swoje cenne pliki
Program Word jest podatny na awarie, co zagraża naszym plikom programu Word. Od czasu do czasu niektóre z naszych bezcennych danych po prostu znikają. Ale to, co zniknęło, nie zniknęło całkowicie. Możesz siedzieć i lamentować nad utratą ważnych plików lub wybrać eksperta uszkodzone narzędzie do odzyskiwania programu Word odzyskać je.
Wprowadzenie autora:
Vera Chen jest ekspertem w dziedzinie odzyskiwania danych w DataNumen, Inc., która jest światowym liderem w technologiach odzyskiwania danych, w tym Naprawa problemu z plikiem Excel xls i pdf oprogramowanie do naprawy. po więcej informacji odwiedź www.datanumen.com