如何超链接Visio Characters对象

Question

我正在使用VBA宏在图形文件中自动添加超链接，这样当文字中提到某个单词时，我就可以链接到图形中的另一个页面。

根据MSDN和Visio的帮助，超级链接对象可以与单元格、字符、行或节对象相关联。但是，除了形状之外，我找不到任何方法来将超链接与任何东西关联起来。

因此，问题是，如何在Visio中将文本段落中的单个单词超链接为单个形状？

Answer 1

我只熟悉在Visio中触发超链接导航的两种方法：

1. 将超级链接添加到形状并单击该形状(或从形状的上下文菜单中选择超级链接)。
2. 在单元格公式中添加对超级链接形状表函数的调用。所做的更改将触发该单元格的重新计算，然后将遵循超链接。

我能想到的最好的想法，它不是很好，是：

1. 确保你的形状是一个组-如果不是，将它转换为组。
2. 将组的属性更改为SelectMode=visGrpSelModeMembers1st，并DisplayMode=visGrpDisModeBack.
3. Drop一个新形状，调整大小并居中于有问题的单词上。使新形状透明(此处的部分透明度可用于highlighting).
4. Change DblClick事件的公式，以将该形状"Hyperlink("yourURLhere")".
5. Add到组。

现在，双击单词实际上应该包括双击新的子形状，这将触发超级链接。只有当你的形状被设计成使用这个想法时，这才是可行的-许多开箱即用的形状在这里不能很好地工作，因为步骤1和2可能会有丑陋的副作用。

我希望其他人知道解决这个问题的更好的方法。