word 2007 目录格式乱的解决办法：
1、按 Alt + F8，新建宏ReSetOutline
2、把下面代码拷进去：
Sub ReSetOutline()
'
' ReSetOutline Macro
'
'
Dim myPara As Paragraph
For Each myPara In ActiveDocument.Paragraphs
myPara.OutlineLevel = myPara.Style.ParagraphFormat.OutlineLevel
Next myPara
End Sub
3、宏应用于文档
4、更新目录域，格式ok
