how to find Start with "一、" "二、" "三、"(chinese 1、2、3) ... in word, than change the paragraph font to bold with Regular expression
For Each pa In .Paragraphs
If pa.Range.Find.execute("一、") Then
pa.Range.Font.Name = "黑体"
End If
Next pa
display "Object does not support the property or method" on
If pa.Range.Find.excute("一、") Then