我目前正在尝试通过VB程序在单词中添加指向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()
其中attachmentRdr
是来自数据库的sqlDatareader
读取文本字符串(附件名称和路径)。如果我运行这个,我会收到错误参数的错误(这会导致'hyperlinks.add()
的过程。
答案 0 :(得分:1)
将范围传递作为Add函数的第一个参数,然后是您的URL:
Dim range As Microsoft.Office.Interop.Word.Range
range = Me.Application.Selection.Range
range.Hyperlinks.Add(range, "http://www.microsoft.com")