亞寵展、全球寵物產業風向標——亞洲寵物展覽會深度解析
356
2024-02-04
如何用文件名中的當前日期保存Word文檔？
如何用文件名中的當前日期保存Word文檔？
如果在保存Word文檔時需要自動在文件名中添加當前日期，那么如何在Word文件中處理此任務？
使用VBA代碼將當前日期的Word文檔保存在文件名中
使用VBA代碼將當前日期的Word文檔保存在文件名中若要在保存Word文檔時自動將當前日期添加到文件名中，請執行以下步驟：
1。 按住 ALT + F11 鍵打開 Microsoft Visual Basic應用程序 窗口。
2。 然后，單擊 插頁 > 模塊，將以下代碼復制并粘貼到打開的空白模塊中：
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 運行此代碼的關鍵，以及 另存為 窗口會自動顯示當前日期 文件名 文本框，請參見屏幕截圖：
4。 然后，您只需要根據需要鍵入自己的文件名，請參見屏幕截圖：
最佳辦公生產力工具
Kutools for Word - 通過 Over 提升您的文字體驗100 顯著特點！深入了解下面突出顯示的功能或 單擊此處探索 Kutools for Word 的全部功能.
?? 文檔掌握: 分頁 / 合并文件 / 以各種格式導出選擇（PDF/TXT/DOC/XLSX） / 批量轉換為PDF / 將頁面導出為圖像 / 一次打印多個文件 ...
? 內容編輯: 批量查找和替換 跨多個文件 / 調整所有圖片的大小 / 轉置表行和列 / 將表格轉換為文字 ...
?? 輕松清潔: 掃開 多余的空間 / 分節符 / 所有標題 / 文本框 / 超鏈接 / 如需更多刪除工具，請前往我們的刪除組
? 創意插入: 插頁 千位分隔符 / 復選框 / 單選按鈕 / 二維碼/ 條碼 / 對角線表 / 公式標題 / 圖片說明 / 表標題 / 多張圖片 / 在我們的插入組中發現更多信息
?? 精準選擇: 精確定位特定頁面 / 表 / 形狀 / 標題段落 / 使用我們的選擇組輕松導航
? 星級增強: 快速導航至任何位置 / 自動插入重復文本 / 在文檔窗口之間無縫切換 / 11 轉換工具 ...
使用 Kutools 轉換您的 Word 任務。 ?? 立即下載并試用 30 天 ??。
了解更多 免費下載 購買
版權聲明：本文內容由網絡用戶投稿，版權歸原作者所有，本站不擁有其著作權，亦不承擔相應法律責任。如果您發現本站中有涉嫌抄襲或描述失實的內容，請聯系我們jiasou666@gmail.com 處理，核實后本網站將在24小時內刪除侵權內容。
相關文章
