Skip to main content

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

如何在Word文檔中僅接受格式追蹤變更?

Author Xiaoyang Last modified

如果您的Word文檔處於追蹤變更模式,當您使用「接受所有變更」功能時,所有的追蹤變更都會被接受。但是,有時候您只想接受格式的追蹤變更,而不接受插入或刪除的部分。本文將介紹如何在Word文檔中解決這個問題。

使用VBA代碼在Word中僅接受格式追蹤變更

使用顯示標記功能在Word中僅接受格式追蹤變更


使用VBA代碼在Word中僅接受格式追蹤變更

以下VBA代碼可以幫助您在Word文檔中僅接受格式追蹤變更,請按照以下步驟操作:

1. 按住ALT + F11鍵打開Microsoft Visual Basic for Applications窗口。

2. 然後,點擊插入 > 模組,將以下代碼複製並粘貼到打開的空白模組中:

VBA代碼:僅在Word文檔中接受格式追蹤變更

Sub AcceptFormatChanges()
    Dim xRev As Revision
    For Each xRev In ActiveDocument.Revisions
        If Left(xRev.FormatDescription, 10) = "Formatted:" Then
            xRev.Accept
        End If
    Next
End Sub

3. 然後按F5鍵運行此代碼,當前Word文檔中的格式追蹤變更會立即被接受。請參見截圖:

Formatting track changes are accepted

Office Tab:為 Word、Excel、PowerPoint... 帶來分頁介面
Navigate through documents using Office Tab

使用顯示標記功能在Word中僅接受格式追蹤變更

在Word文檔中,您還可以使用顯示標記功能來完成此操作,請按照以下步驟進行:

1. 在追蹤變更模式的文件中,點擊審閱 > 顯示標記,然後取消勾選批註 插入與刪除選項,保留格式選項勾選,請參見截圖:

Formatting option checked on the Review tab on the ribbon

2. 現在,您只能看到格式追蹤變更,然後繼續點擊審閱 > 接受 > 接受所有顯示的變更,如下截圖所示:

Accept All Changes Shown option on the Review tab on the ribbon

3. 所有格式追蹤變更都已被接受,現在,您需要通過從顯示標記下拉列表中勾選它們來返回批註插入與刪除選項,請參見截圖:

Comment, Insertions and Deletions options checked back on the Review tab on the ribbon

4. 現在,您可以看見格式追蹤變更已被接受,而其他追蹤變更仍然保留,請參見截圖:

Formatting track changes are accepted

最佳辦公效率工具

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 工具