时间戳

首页 > 解决方案 > 动态修改交叉引用工具提示文本

ms-word - 动态修改交叉引用工具提示文本

问题描述

我的 Word 文档中有一系列交叉引用。我正在尝试运行将每个交叉引用工具提示文本更新为目标位置的文本段落的代码。

我的交叉引用的结构是“插入为超链接”、“段落编号（完整上下文）”和“包括上/下”。

我正在尝试编写代码来遍历文档中的每个交叉引用并更改工具提示文本，如上所示。

我观察到，在任何具有交叉引用的 Word 文档中，将鼠标悬停在交叉引用上会显示文本“当前文档；Ctrl+单击以跟随链接'。我正在尝试确定此文本是否可以动态修改，或者此文本是否已硬连接到 Microsoft 的编译代码中。恐怕这样的文字是不可修改的。☹</p>

标签： ms-word

解决方案

您所描述的是超链接，而不是交叉引用。“Ctrl+单击以跟随链接”文本只能在您可以通过编辑“使用 Ctrl+单击以跟随超链接”选项将其更改为“单击以跟随链接”的范围内进行修改。屏幕提示的其余部分可以使用如下代码显示参考段落：

Dim HLnk As Hyperlink
For Each HLnk In ActiveDocument.Hyperlinks
  With HLnk
    If .Address = "" Then .ScreenTip = Split(ActiveDocument.Bookmarks(.SubAddress).Range.Paragraphs.First.Range.Text, vbCr)(0)
  End With
Next

推荐阅读