SetAllFuzzyOptions 方法

       

激活所有与日文文本相关的模糊搜索选项。

expression.SetAllFuzzyOptions

expression  必需。该表达式返回一个 Find 对象。

说明

本方法将下列属性设为 True

MatchFuzzyAY
MatchFuzzyBV
MatchFuzzyByte
MatchFuzzyCase
MatchFuzzyDash
MatchFuzzyDZ
MatchFuzzyHF
MatchFuzzyHiragana
MatchFuzzyIterationMark
MatchFuzzyKanji
MatchFuzzyKiKu
MatchFuzzyOldKana
MatchFuzzyProlongedSoundMark
MatchFuzzyPunctuation
MatchFuzzySmallKana
MatchFuzzySpace
MatchFuzzyTC
MatchFuzzyZJ

示例

本示例在选定区域内执行搜索之前,激活所有模糊选项。如果单词“baiorinbaiorinbaiorinbaiorinbaiorin”的格式为加粗,则选定整个段落并将其复制到“剪贴板”上。

With Selection.Find
    .ClearFormatting
    .SetAllFuzzyOptions
    .Font.Bold = True
    .Execute FindText:="baiorinbaiorinbaiorinbaiorinbaiorin", Format:=True, Forward:=True
    If .Found = True Then
        .Parent.Expand Unit:=wdParagraph
        .Parent.Copy
    End If
End With