Índice de atualização automática no Word ao salvar como PDF

Question

Toda vez que eu salvo meu documento como PDF, recebo esta caixa de diálogo (várias vezes desde que eu tenho o índice para cada seção). Existe uma configuração para atualizar automaticamente todos os índices e evitar essas mensagens?

    

Answer 1

Uma macro parece ser a única maneira de atualizar todos os TOCs e evitar essas mensagens irritantes. Felizmente alguém escreveu um para fazer apenas isso que pode ser encontrado no Fóruns da Microsoft . Eu copiei aqui, caso o link caia.

Sub UpdateDocument()
    Dim oStory As Range
    Dim oTOC As TableOfContents
    Dim oTOF As TableOfFigures
      For Each oStory In ActiveDocument.StoryRanges
        oStory.Fields.Update
        If oStory.StoryType  wdMainTextStory Then
          While Not (oStory.NextStoryRange Is Nothing)
            Set oStory = oStory.NextStoryRange
            oStory.Fields.Update
          Wend
        End If
      Next oStory
    For Each oTOC In ActiveDocument.TablesOfContents
            oTOC.Update
        Next oTOC
    For Each oTOF In ActiveDocument.TablesOfFigures
            oTOF.Update
        Next oTOF
        ActiveDocument.Save
End Sub