Skip to main content

Kutools for Office — 一套工具,五種功能。完成更多工作。

如何在重新打開 Word 文檔時自動更新域代碼?

Author Sun Last modified

在 Word 文檔中,我們可以使用域插入文檔名稱,但如果文檔已重命名,則文件名域無法自動更新。在本教程中,我將介紹在 Word 中重新打開文檔後自動更新所有域代碼的方法。

在 Word 中重新打開時自動更新域代碼


重新打開 Word 文檔時自動更新域代碼

在 Word 中,除了 VBA 代碼外,沒有內置功能可以更新插入的域。

1. 按 Alt + F11 鍵啟動 Microsoft Visual Basic for Applications 窗口,在左側窗格中雙擊 ThisDocument 以打開 ThisDocument (Code) 窗口。

2. 將以下代碼複製並粘貼到 ThisDocument (Code) 窗口中。

VBA:重新打開文檔時刷新域代碼

Sub AutoOpen()
'UpdatebyExtendoffice20180830
    Dim xRange As Range
    Dim xFiled As Field
    For Each xRange In ActiveDocument.StoryRanges
        For Each xFiled In xRange.Fields
            xFiled.Update
        Next
    Next
End Sub

VBA pasted into the ThisDocument (Code) window

3. 點擊 Save button 保存代碼於 Microsoft Visual Basic for Applications 窗口,隨後彈出 Microsoft Word 對話框,點擊 進入 另存為 對話框。
Save As dialog box

4. 在 「另存為」對話框中,選擇一個文件夾保存文檔,根據需要命名,從 「保存類型」下拉菜單中選擇「Word 啟用宏的文檔」,然後點擊「保存」按鈕。參見截圖:
Field codes updated automatically

從現在開始,每次您打開啟用宏的文檔時,所有域代碼都會自動更新。
Enable all macros (not recommended; potentially dangerous code can run) option checked in the Trust Center dialog

注意:確保在「信任中心」對話框中勾選了 「啟用所有宏(不推薦;可能運行危險代碼)」選項(點擊 文件 > 選項 > 信任中心 > 宏設置)。
doc auto update fields when open 5

多個 Word 文件/Excel 工作簿的分頁瀏覽與編輯,就像在 Chrome 和 Edge 中一樣!

就如同在 Chrome、Safari 和 Edge 中瀏覽多個網頁一樣,Office Tab 讓您可以在一個 Word 視窗或 Excel 視窗中開啟並管理多個 Word 文件或 Excel 工作簿。現在只需點擊分頁即可輕鬆切換文件或工作簿!

立即免費試用 Office Tab!

最佳辦公效率工具

Kutools for Word -透過超過 100 項卓越功能,提升您的 Word 使用體驗!

🤖 Kutools AI FeaturesAI AssistantReal-Time AssistantSuper Polish(保留格式)Super Translate(保留格式)AI RedactionAI Proofread...

📘 文件掌握分割頁面文檔合併區域導出成各種格式(PDF/TXT/DOC/HTML...)批量轉換為 PDF...

正文編輯批量查找與替換多個文件批量調整所有圖片大小翻轉表格的行與列表格轉文本...

🧹 輕鬆清理:快速清除多餘空格分節符文字框超連結/更多清除工具請前往刪除工具組...

創意插入:插入千位分隔符複選框選項按鈕二維碼條形碼批量插入圖片/還有更多精彩功能在插入工具組...

🔍 精確選擇:精確定位特定頁面表格形狀標題段落/使用更多 選擇 功能提升導航效率...

亮點增強導航至任何區域自動插入重複文字切換文檔窗口11 轉換工具...

🌍 支援40+種語言:可用 Kutools於您偏好語言環境——支援英語、西班牙語、德語、法語、中文以及超過40種語言!

Kutools and Kutools Plus tabs on the Word Ribbon
👉 想立即體驗這些功能嗎?立即下載 Kutools for Word!🚀
 

✨ Kutools for Office——一次安裝,五大強力工具!

包含 Office Tab Pro · Kutools for Excel · Kutools for Outlook · Kutools for Word · Kutools for PowerPoint

📦 五大工具一次全擁有 | 🔗 與 Microsoft Office 無縫整合 | ⚡ 即刻省時提高工作效率

最佳辦公效率工具

Kutools for Word - 100+ 款 Word 工具