ms-word - 如何在整个 Word 文档中以编程方式查找和替换

Question

我有一个 Word 文档，其中包含表格中的文本和表格外的文本。我想在所有文本中查找和替换，而不仅仅是表格外的文本。文档的内容属性只是“主要故事”而不是表格。我不想遍历所有表对象。我只想在所有文本中查找和替换，就像我使用 Word gui 手动执行一样。

请把我从我正在燃烧的精神 hell 中拯救出来。

[燃烧肉体的恶臭开始让我担心。几乎和我四肢的剧痛一样多。]

[我的腿和 ARM 被火焰吞噬了。我用我的 Nose 写这个，因为 key 上的塑料融化了。]

Answer 1

使用 Find 属性，它与 UI 相同。搜索“查找属性”的帮助主题以帮助您入门。

With ActiveDocument.Range.Find
    .Text = "hi"
    .Replacement.Text = "hello"
    .Execute Replace:=wdReplaceAll, Forward:=True, Wrap:=wdFindContinue
End With