У цій статті ми покажемо вам цікавий фокус, щоб вставити майбутню або минулу дату у свій документ Word за допомогою кодів VBA.
Як правило, нам не важко вставити поточну дату в наш документ Word. І все ж, час від часу, ми можемо готуватися до документа, необхідного наступного тижня, місяця чи навіть пізніше. Тоді ось проблема, яку ви не можете обійти. Як можна вставити майбутню дату у файл Word? А іноді як щодо минулого навіть?
Тому ми вважаємо, що ви повинні зрозуміти цей корисний метод, щоб краще виконувати свої робочі завдання.
Використовуйте коди VBA, щоб вставити дату майбутнього або вставити
- Для початку відкрийте документ Word.
- Потім натисніть вкладку “Розробник”.
- Далі натисніть “Visual Basic”, щоб відкрити редактор VBA. Якщо вкладка “Розробник” недоступна на вашій стрічці Word, ви можете натиснути “Alt + F11”, щоб відкрити редактор.
- Тепер у редакторі натисніть "Звичайний" зліва.
- Потім натисніть «Вставити» на панелі інструментів.
- Далі виберіть “Модуль” зі списку-меню.
- Тепер двічі клацніть на щойно вставлений модуль, і область редагування буде доступна з правого боку.
- Просто вставте туди такі коди:
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
- Далі натисніть кнопку «Зберегти» та закрийте редактор VBA.
- Тепер поверніться до екрана документа Word і поставте курсор туди, куди йде майбутня або минула дата.
- Потім знову натисніть вкладку «Розробник».
- І натисніть «Макроси» в групі «Код», щоб відкрити вікно «Макроси». Знову ж таки, якщо вкладка “Розробник” не відображається, вам просто потрібно натиснути “Alt + F8”.
- Тепер у вікні “Макроси” знайдіть і виберіть макрос “InsertFutureOrPastDate”.
- Далі натисніть «Виконати».
- Тоді вас привітає вікно повідомлення. Ви можете ввести число у текстовому полі внизу поля, щоб представити дні, що залишились до майбутньої дати. Наприклад, якщо ви хочете вставити завтрашню дату, ви повинні там ввести "1". Так само, якщо вам потрібна минула дата, просто додайте знак мінуса перед значенням, наприклад, «-1» за вчора.
- Не забудьте натиснути “OK”.
Примітка: У кодах “Selection.TypeText Text: = Format (Date + strNumberOfDays,“ dddd, MMMM dd, yyyy ”),“ dddd, MMMM dd, yyyy ”представляють формат дати, де“ M ”означає“ місяць ” , "D" - "день", "y" - "рік" і "dddd" - "тиждень", тому ви можете змінювати його як завгодно.
Відновіть свої цінні файли
Word сприйнятливий до згортання, що створює небезпеку для наших файлів Word. Час від часу деякі наші безцінні дані просто зникають. Але те, що зникло, не зникло повністю. Ви можете сидіти, щоб нарікати над втратою важливих файлів, або можете вибрати досвідченого пошкоджений інструмент відновлення Word - - щоб отримати їх.
Вступ автора:
Віра Чень є експертом з відновлення даних у DataNumen, Inc., яка є світовим лідером у галузі технологій відновлення даних, в тому числі Виправлення неполадок у файлі Excel XLS та pdf ремонт програмних продуктів. Для отримання додаткової інформації відвідайте WWW.datanumen.com