Создает оглавление:

With ActiveDocument
.TablesOfContents.Add Range:=Selection.Range, RightAlignPageNumbers:= _
True, UseHeadingStyles:=True, UpperHeadingLevel:=1, _
LowerHeadingLevel:=3, IncludePageNumbers:=True, AddedStyles:="", _
UseHyperlinks:=True, HidePageNumbersInWeb:=True, UseOutlineLevels:= _
True
.TablesOfContents(1).TabLeader = wdTabLeaderDots
.TablesOfContents.Format = wdIndexIndent
End With


WordBasic.UpdateTableOfContents - обновляет оглавление.


я открываю документ - нажимаю макрос, и если оглавления нет, то макрос вставляет оглавление, если оглавление уже существует - то его надо просто обновить.

Собствеено проблема заключается в написании этого условия =))) заранее спасибо за внимание=)