как создать оглавление (TOC) с помощью макроса

Мне нужно создать оглавление после слияния с помощью макроса, так как слово не поддерживает обновление поля TOC из полей TC.

Можно ли автоматизировать создание ТОС?


vba ms-word
person Tom    schedule 22.09.2009    source источник

Ответы (1)


arrow_upward
4
arrow_downward

Это создаст оглавление с использованием VBA:

    Set rangeWord = ActiveDocument.Range(Start:=0, End:=0)
    ActiveDocument.TablesOfContents.Add rangeWord, _
                                    UseFields:=True, _
                                    UseHeadingStyles:=True, _
                                    LowerHeadingLevel:=3, _
                                    UpperHeadingLevel:=1
person DAC    schedule 22.09.2009