选择两个单词之间的文本和删除空行

时间:2012-11-06 00:47:17

标签: vba replace ms-word

我正在尝试删除两个占位符之间的word文档中出现的空行。

  1. 我不确定如何在整个文档中找到占位符的位置。

  2. 我不知道如何在占位符之间进行搜索,并用一个回车替换多个回车。

  3. 我尝试转换代码here但无法使其正常工作。

1 个答案:

答案 0 :(得分:0)

如果占位符始终相同,则可以从Word的“查找和替换”对话框中完成整个操作。没有必要的代码。

例如,要替换多个回车符:

  • 控制+ H
  • 打开
  • 上的“使用通配符”
  • 查找:(占位符1)^ 13 {2,}(占位符2)\包含括号
  • 替换:\ 1 ^ 13 \ 2

如果您正在尝试将其合并到更大的代码块中:

With Selection.Find
    .Text = "(Placeholder1)^13{2,}(Placeholder2)"
    .Replacement.Text="\1" & " ^13 " & "\2"
    .Forward = True
    .Wrap = wdFindContinue
    .MatchWildcards = True
    .Execute
End With

请告诉我这是否适合您。