4

我目前正在尝试通过 VB 程序在 word 中添加指向 web url 的超链接。我正在跌跌撞撞地尝试找到正确的语法以及完成此操作所需的内容，因为我得到了很多无用的 VBA 示例，这根本不是我需要的。

我的代码如下所示：

sPara2 = oDoc.Content.Paragraphs.Add
sPara2.Range.Text = attachmentRdr("attachmentName")
sPara2.Range.Hyperlinks.Add(attachmentRdr("attachmentPath"))
sPara2.Format.SpaceAfter = 24    '24 pt spacing after paragraph.
sPara2.Range.InsertParagraphAfter()

whereattachmentRdr是sqlDatareader从数据库中读取的文本字符串（附件名称和路径）。如果我运行它，我会收到错误参数的错误（从hyperlinks.add().

4

1 回答 1

2

将 range 作为第一个参数传递给 Add 函数，然后是您的 URL：

Dim range As Microsoft.Office.Interop.Word.Range
range = Me.Application.Selection.Range
range.Hyperlinks.Add(range, "http://www.microsoft.com")
于 2013-01-19T12:49:13.297 回答