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
