vba - Word 2010 - 使用 VBA 保存为 PDF - 保留目录链接？

Question

我的任务是为 Word 2010 编写一个宏，使用 Words Save As PDF 输出为 PDF。

我将宏保存为 PDF，它从选定的目录向下迭代，并将所有.doc文件导出为 PDF。

在目录未设置为“使用超链接而不是页码”的文档中，我丢失了 PDF 版本文件中的链接。

本质上，我需要执行此处详述的前 4 个步骤。

有谁知道如何使用 VBA 设置此选项？

Answer 1

Sub AddTOCLinks()
Dim TOC As TableOfContents
With ActiveDocument
  For Each TOC In .TablesOfContents
    With TOC.Range.Fields(1)
      If InStr(.Code.Text, "\h") = 0 Then
        .Code.Text = Trim(.Code.Text) & " \h"
        .Update
      End If
    End With
    TOC.Update
  Next
End With
End Sub

在这里找到