其实,到现在都不知道到底是什么原因,不过,暂时的办法是找到了。
首先看一下问题的图片描述,如下:
其中出现的形如a),b)这些并不是样式选错,而是意外出现。
解决办法是这样的,首先,Alt+F8,弹出宏对话框,如下图:
之后点击创建按钮,将如下VB代码拷贝到编辑器中,如图:
Sub ReSetOutline()
Dim myPara As Paragraph
For Each myPara In ActiveDocument.Paragraphs
myPara.OutlineLevel = myPara.Style.ParagraphFormat.OutlineLevel
Next myPara
End Sub