Question

我一直潜伏在这里一段时间，但这是我的第一篇文章，所以让我知道我是否需要改变一些东西。无论如何，这里是：

我正在尝试创建一个宏，它将向工作表中的单元格添加超链接。问题是在运行宏之后，我注意到我的电子表格的文件夹位置已经预先添加到我指定的地址。我需要做些什么来表明这是一个网页而不是本地文件吗？宏的摘录如下。

Dim IGQ As Range
Dim IGQno As String
Dim IGQno1 As String

For Each IGQ In Range("A2:A10") 'Actual range is much larger

IGQno = IGQ.Value
IGQno1 = Left(IGQ, 1)
Sheets("Cameron DCDA").Hyperlinks.Add Anchor:=IGQ, _
Address:="""http://xxxx""&IGQno1&""xxx""&IGQno&""xxxxx""" 'It's a company website so they probably don't want me to share it

Next

结果是为每个单元格创建了一个超链接，但它链接到file：/// C：\ Users \ John.Doe \ Documents \“http://xxxx”＆amp; IGQno1＆amp;“xxx”＆amp; IGQno＆安培; “XXXXX”

我尝试在地址中使用较少的引号，因为它似乎有点矫枉过正但是我得到编译错误“预期：结束语句”

你们有什么建议吗？

Answer 1

报价过多

Address:="http://xxxx " & IGQno1 & "xxx" & IGQno & "xxxxx"

另外 - 请务必在&之前留一个空格，否则会将其解释为变量类型后缀：

What are possible suffixes after variable name in VBA?

VBA Hyperlinks.Add方法将本地文件夹添加到地址

1 个答案: