Як зберегти документ Word із поточною датою в назві файлу?
Якщо вам потрібно автоматично додати поточну дату в назві файлу під час збереження документа Word, як би ви могли впоратися з цим завданням у файлі Word?
Збережіть документ Word із поточною датою в назві файлу за допомогою коду VBA
Збережіть документ Word із поточною датою в назві файлу за допомогою коду VBA
Щоб автоматично додати поточну дату до імені файлу під час збереження документа Word, виконайте такі дії:
1. Утримуйте клавішу ALT + F11 ключі, щоб відкрити Microsoft Visual Basic для додатків вікна.
2. А потім натисніть Insert > Модулі, скопіюйте та вставте код нижче у відкритий порожній модуль:
Код VBA: Збережіть документ Word із поточною датою в назві файлу
Public Sub FileSave1()
Dim xDlg As Dialog
Dim xTitle As String
On Error Resume Next
xTitle = ActiveDocument.BuiltInDocumentProperties("Title").Value
xTitle = xTitle & " " & Format((Year(Now() + 1) Mod 100), "20##") & "-" & _
Format((Month(Now() + 1) Mod 100), "0#") & "-" & _
Format((Day(Now()) Mod 100), "0#")
Set xDlg = Dialogs(wdDialogFileSaveAs)
xDlg.Name = xTitle
xDlg.Show
End Sub
3. Після вставки коду в модуль натисніть F5 ключ для запуску цього коду, і a Зберегти як вікно автоматично відображається з поточною датою у вікні Файл текстове поле, див. знімок екрана:
4. А потім вам просто потрібно ввести власне ім’я файлу, як вам потрібно, див. Знімок екрана:
Рекомендовані засоби підвищення продуктивності слів
Kutools для Word - Більше 100 вдосконалених функцій для Word, економите свій 50% часу
- Складні та повторювані операції можна виконати одноразово за кілька секунд.
- Вставте кілька зображень між папками в документ Word одночасно.
- Об’єднайте та об’єднайте декілька файлів Word у папках в одне із потрібним замовленням.
- Поділіть поточний документ на окремі документи відповідно до заголовка, розділу розділу чи інших критеріїв.
- Перетворюйте файли між Doc та Docx, Docx та PDF, колекцією інструментів для загальних перетворень та виділення тощо ...
