在word宏中使用通配符

时间:2011-02-01 15:58:46

标签: vba ms-word word-vba word-2007

我在Word 2007中创建了一个模板,其中包含几个我希望用户能够快速查找和编辑的字段。我已经指出了这样的字段:[改变这个]。

我想创建一个宏,它会找到以“[”开头并以“]”开头的所有单词并突出显示它们。

到目前为止,我的宏发现所有以“[”开头的单词并突出显示它们。我只是想不出如何让它突出显示包括“]”在内的其余部分。

我在这里查看了通配符的规则http://www.gmayor.com/replace_using_wildcards.htm并认为我可以使用以下内容:< []>但它永远找不到任何东西。

我会感激一些帮助!谢谢!

以下是代码:

Sub HighlightAllItems()
Dim myRange As Range
Dim searchText As String

searchText = "["

Set myRange = ActiveDocument.Range
With myRange.Find
.MatchWildcards = True
.Text = searchText
.ClearFormatting
.Replacement.ClearFormatting
.Replacement.Highlight = True
.Replacement.Text = searchText
.Forward = True
.Format = True
.Execute Replace:=wdReplaceAll
End With
End Sub

1 个答案:

答案 0 :(得分:0)

尝试使用此搜索模式:\[<*>\]