在Word VBA中系统地超链接文本

Question

我为一家在Microsoft Word中经常进行自定义报告的公司工作。我想编写一个VBA宏，系统地浏览以下列表和超链接仅文本（不是段落符号或标签箭头或列表编号）和指向当前文档中书签的链接。

1 → Description of Figure 1 ¶
¶
2 → Description of Figure 2 ¶
¶
3 → Description of Figure 3 ¶
¶
4 → Description of Figure 5 ¶
¶

宏完成后，点击"Description of Figure 1"将转到同一文档中稍后存在的书签Figure_01。我感谢任何人都能给予的帮助！

Answer 1

我们不能只是继续为你写它，这不是网站的本质，但是，我不想告诉你再去做一些努力，我们会支持这一点。

我想为你提供一些指导。到目前为止，你已经陷入了特定的问题（例如'为什么我会得到错误X'或'为什么我的循环没有捕获所有内容'），那就是这个网站为你发光并给予大力支持的时间！ / p>

那么从哪里开始？我将假设非VBA经验以及下面的速成课程。

首先，我们需要一个可以运行的程序。在Word中按Alt + F11，这将打开VBE（VBA编辑器）

从左上角的项目窗口（通常）双击'ThisDocument'，主窗口将成为我们编写代码的空间。在最顶层写的第一件事是Option Explicit，这告诉VBA运行时必须声明所有变量，这是一种很好的做法。

接下来输入： -

Public Sub CreateLinks()

End Sub

您现在已经创建了一个名为CreateLinks的过程，而您的插入点（垂直闪烁线）位于这两行代码之间，您可以按F8逐行逐步执行代码，或者按F5运行所有代码一气呵成。

这是一切的开始。现在你需要做的是。

1. 连接到文档
2. 找到要链接到的文字
3. 从
中找到要链接的文字
4. 创建链接
5. 重复步骤2 - 5，直到完成所有链接。

那应该会给你答案。

作为进一步的指示/提示，可以帮助您： -

Application包含一系列文档，您可以浏览它们或打开文档以连接到它

Document有一组书签和超链接，您可以在实现目标的同时循环使用这些书签和超链接

Selection是有效的选定文字

我希望这有帮助。