摘要：
工具==>宏==>宏(Alt + F6)，把下面代码拷进去：Java代码 SubReSetOutline() DimmyParaAsParagraph ForEachmyParaInActiveDocument.Paragraphs myPara.OutlineLevel=myPara.style.ParagraphFormat.OutlineLevel NextmyPara EndSubSub ReSetOutline()Dim myPara As ParagraphFor Each myPara In ActiveDocument.ParagraphsmyPara.Outlin 阅读全文