在Word插件中创建超链接

Question

是否有任何方法以编程方式向MS Word插件中选定的文本添加超链接?

Answer 1

下面的代码将选定的文本转换为指向Microsoft站点的超链接:

        Microsoft.Office.Interop.Word.Range currentRange = Globals.ThisAddIn.Application.Selection.Range;
        if (currentRange != null)
        {
            Microsoft.Office.Interop.Word.Hyperlink hp = (Microsoft.Office.Interop.Word.Hyperlink)
                currentRange.Hyperlinks.Add(currentRange, "http://www.microsoft.com");
        }

默认情况下，超链接的实际文本将是您选择的文本。如果您需要该文本具有不同的值，例如—实际的url地址，您可以简单地更改TextToDisplay属性:

hp.TextToDisplay = "http://www.microsoft.com";

我不确定你的逻辑到底需要多动态，但我相信上面的例子会给你一个正确的方向。

Answer 2

如果你想在VBA中这样做，它是

ActiveDocument.Hyperlinks.Add Anchor:=Selection.Range, ...

Sytnax:

expression.Add(Anchor, Address, SubAddress, ScreenTip, TextToDisplay, Target)