我正在搜索具有VBA功能的Word(2016)文档,以查找应用了黄色背景色的段落。如果段落的样式为Normal
...
With Selection.Find
.ClearFormatting
.ParagraphFormat.Shading.BackgroundPatternColor = wdColorYellow
.Wrap = wdFindContinue
.Text = ""
End With
While Selection.Find.Execute
' do the thing
Wend
运行此命令后,便可以在Word中打开“高级查找”对话框,显示如下:
有些带有黄色背景图案的段落不是Style = "Normal"
,并且发生这种情况时,我可以使用“格式->样式”对话框来删除样式为Normal
的要求...
如果现在返回VBA,则可以使用Selection.Find.Execute
,并且可以找到之前遗漏的段落。询问Selection.Find.Style
属性会显示值Normal
,该值与以前一样,只是现在起作用了。
在VBA中似乎没有任何方法可以删除样式要求? 有人知道该怎么做吗?
我尝试将Style
的值设置为:
这些都不起作用。我也尝试设置Find.Format = False
,但是那也不起作用。我认为VBA中的Find.Style
属性仍然显示Normal
很奇怪,但是如果我将其设置为Normal
,搜索将找不到该段落。
现在就打开任何建议。