Обновить целиком оглавление в Word из VBA

Формулировка задачи:

После определенной манипуляции из макроса с документом Word, необходимо обновить оглавление, которое уже было создано, но в силу изменения структуры документа стало не актуальным как в отношении номеров страниц, так и в отношении собственно пунктов оглавления (появились новые заголовки, на разных уровнях и их надо включить в оглавление). Путем экспериментов пытался найти команду используемую для этого самим вордом. т.е. ставил на запись макрос и обновлял только номера страниц и обновлял оглавление целиком. Но к моему удивлению в редакторе макросов я увидел использование дважды одной и той же команды:

Selection.Fields.Update

Как я потом при запуске этого макроса я выяснил, что это команда для обновления только номеров страниц. Видимо, в режиме записи макроса, ворда не все команды пишет в модуль... И вот собственно возникла проблема, как же все-таки обновить оглавление целиком из макроса?

Решение задачи: «Обновить целиком оглавление в Word из VBA»

textual
                            Листинг программы 
                        

                            Sub TablesOfContentsUpdate()
   ActiveDocument.TablesOfContents(1).Update
End Sub
                        