qiu491996004 发表于 2012-9-11 11:37:51

[已解决]在excel中添加链接求助Hyperlinks

本帖最后由 qiu491996004 于 2012-9-11 17:40 编辑

With Sheets("Menu")
shtName = Sheets(2).Name
.Hyperlinks.Add .Range("C3"), "#'" & shtName & "'!A1", TextToDisplay:=shtName
End With
上面是添加一个链接的宏，代码如何转成au3所能识别的代码

qiu491996004 发表于 2012-9-11 16:19:09

自己顶一个先 难道没人吗？

qiu491996004 发表于 2012-9-11 16:31:57

With $excel.Sheets("Menu")
$shtName = $excel.Sheets(2).Name
.Hyperlinks.Add(.Range("C3"), "#'" & $shtName & "'!A1", $shtName)
EndWith

运行后能生成链接但是点击后却提示“引用无效”求大神指点

kevinch 发表于 2012-9-11 16:39:34

With $excel.Sheets("Menu")
$shtName = $excel.Sheets(2).Name
.Hyperlinks.Add(.Range("C3"),"", "'" & $shtName & "'!A1", $shtName,$shtName)
EndWith
这样试下，第一个地址是外链地址，第二个才是本文件内部地址

qiu491996004 发表于 2012-9-11 17:34:33

K哥V5啊可以了多谢多谢 Hyperlinks.Add这个方法的参数含义哪里有查的刚刚试了下 最后一个参数应该是给那个单元格赋值的

qiu491996004 发表于 2012-9-11 17:35:39

回复 4# kevinch


    K哥有没有什么资料活方法推荐的 下午找了好久的Hyperlinks.Add函数用法就是没找到郁闷啊

kevinch 发表于 2012-9-11 18:10:38

只要你的excel有vba环境，在vba编辑器或立即窗口中输入hyperlinks然后用鼠标全选这个词按f1就能看到帮助了
页: [1]
查看完整版本: [已解决]在excel中添加链接求助Hyperlinks