Word TOC更新无法正常工作

时间:2016-07-22 06:31:07

标签: ms-word word-vba tableofcontents

我有这个代码(功能区中的按钮)来更新我的文档中的TOC(Word 2010 - Windows 7)

ActiveDocument.TablesOfContents(1).Update

,但它没有更新TOC

唯一能做的就是内置的"更新表"参考菜单中的命令。

当光标在TOC中时按F9键不起作用,此代码也不起作用

Dim TOC As TableOfContents
With ActiveDocument
    For Each TOC In .TablesOfContents
        TOC.Update
    Next
End With

任何想法可能会发生什么,因为它非常令人沮丧

1 个答案:

答案 0 :(得分:0)

我很久以前写过这个,因为这个问题确实存在......

Option Explicit

' Update all the tables of contents, without annoying prompts.
Sub UpdateAllMyFields()
    Dim t As TableOfContents
    For Each t In ActiveDocument.TablesOfContents
        t.Update
    Next t
    ActiveDocument.Fields.Update        ' Update all fields.
End Sub

每当我必须处理TOC和字段时,我都会使用它。 我还有关于打印选项集的更新字段。