仅在 Word 文档中接受特定修订的 3 种方法

在本文中，我们想与您分享 3 种仅在 Word 文档中接受特定修订的方法。

通常，在带有修订的文档中，您可以一次全部接受它们，也可以一个接一个地接受它们。 但有时，您可能只需要接受特定的更改，例如所有格式更改。 为了解决这个问题，它需要额外的步骤。

以下是仅在不同情况下接受特定跟踪更改的 3 种方法。

方法 1：接受特定类型的所有跟踪更改

在这里，假设我们需要接受文档中的所有格式更改。

1. 首先，点击“审阅”选项卡。
2. 然后单击“显示标记”命令。
3. 接下来仅选中下拉菜单中的“格式化”框。
4. 现在您可以看到文档中只显示了格式更改。 单击“接受”命令上的下拉按钮。
5. 并选择“接受所有显示的更改”选项。

同样，要接受其他更改，只需在文档中显示该类型的更改并接受它们。

方法 2：只接受删除或插入

从第一个截图可以看出，插入和删除是绑定在一起的。 因此，要接受其中之一，您需要一个宏。

1. 首先，在Word中按“Alt+F11”触发VBA编辑器。
2. 接下来单击“Normal”项目，然后单击菜单栏上的“Insert”。
3. 然后在该菜单上选择“模块”以插入一个新模块。
4. 然后双击模块打开它并粘贴以下代码：

Sub AcceptOnlyDeletionsInDoc()
  Dim objRevision As Revision
  Dim objDoc As Document
 
  Application.ScreenUpdating = False
 
  Set objDoc = ActiveDocument
 
  For Each objRevision In objDoc.Revisions
    With objRevision
      If .Type = wdRevisionDelete Then
        .Accept
      End If
    End With
  Next objRevision
 
  Application.ScreenUpdating = True
  Set objDoc = Nothing
End Sub

5. 最后，单击“运行”按钮或只需按“F5”即可执行代码。

该宏接受文档中的所有删除。 至于接受所有插入，您只需用这个宏替换：

Sub AcceptOnlyInsertionsInDoc()
  Dim objRevision As Revision
  Dim objDoc As Document
 
  Application.ScreenUpdating = False
 
  Set objDoc = ActiveDocument
 
  For Each objRevision In objDoc.Revisions
    With objRevision
      If .Type = wdRevisionInsert Then
        .Accept
      End If
    End With
  Next objRevision
 
  Application.ScreenUpdating = True
  Set objDoc = Nothing
End Sub

方法 3：接受选择中的所有更改

此方法向您展示如何快速接受选择中不同类型的所有更改。

1. 到tart with, 做出选择 tar获取范围。
2. 然后单击功能区中的“审阅”选项卡。
3. 接下来单击“接受”命令上的下拉按钮。
4. 在下拉菜单中，选择“接受更改”。 就是这样。

数据丢失无处不在

顺应数字化浪潮，获得概率 腐败文件 在增加。 考虑到您的数据的价值，强烈建议您拥有足够的修复工具。 因此，您可以用最少的时间恢复文档。

作者简介：

Vera Chen 是一位数据恢复专家 DataNumen, Inc.，它是数据恢复技术领域的世界领先者，包括 修复 xls 和 pdf 修复软件产品。 欲了解更多信息，请访问 datanumen.com