Note: The other languages of the website are Google-translated. Back to English

Як зберегти документ 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 Зберегти як вікно автоматично відображається з поточною датою у вікні Файл текстове поле, див. знімок екрана:

зберегти документ із датою 1

4. А потім вам просто потрібно ввести власне ім’я файлу, як вам потрібно, див. Знімок екрана:

зберегти документ із датою 2


Рекомендовані засоби підвищення продуктивності слів

 

Kutools для Word - Більше 100 вдосконалених функцій для Word, економите свій 50% часу

  • Складні та повторювані операції можна виконати одноразово за кілька секунд.
  • Вставте кілька зображень між папками в документ Word одночасно.
  • Об’єднайте та об’єднайте декілька файлів Word у папках в одне із потрібним замовленням.
  • Поділіть поточний документ на окремі документи відповідно до заголовка, розділу розділу чи інших критеріїв.
  • Перетворюйте файли між Doc та Docx, Docx та PDF, колекцією інструментів для загальних перетворень та виділення тощо ...
Коментарі (0)
Поки немає оцінок. Оцініть першим!
There are no comments posted here yet
Залишайте свої коментарі
Публікація як гість
×
Оцініть цю публікацію:
0   Персонажі
Рекомендовані місця

Слідуй за нами

Copyright © 2009 - WWW.extendoffice.com. | Всі права захищені. На основі ExtendOffice. | Карта сайту
Microsoft та логотип Office є товарними знаками або зареєстрованими товарними знаками Microsoft Corporation у США та / або інших країнах.
Захищений Sectigo SSL