VBA为图形对象插入超链接

团子大家族cl · 发表于 2023-1-26 15:45

本帖最后由团子大家族cl 于 2023-1-26 15:46 编辑

如题，给图形对象插入超链接时，anchor参数的值该如何表示？

我以变量shp作为图形对象，anchor的值写成shp，会报错，不知道这里该如何表达？
求教老师

LIUZHU · 发表于 2023-1-26 19:26

录制宏是否可以得到答案？

lss001 · 发表于 2023-1-26 20:18

ActiveSheet.Hyperlinks.Add _
ActiveSheet.Shapes("圆角矩形 1"), "", _
Sheet9.Name & "!A1"

团子大家族cl · 发表于 2023-1-27 20:39

LIUZHU 发表于 2023-1-26 19:26
录制宏是否可以得到答案？

录制宏的话，是先选取，再从选取的对象中以item序号的形式展示的

团子大家族cl · 发表于 2023-1-27 20:51

lss001 发表于 2023-1-26 20:18
ActiveSheet.Hyperlinks.Add _
ActiveSheet.Shapes("圆角矩形 1"), "", _
Sheet9.Name & "!A1"

搞定了，谢谢老师，少了一个引号

团子大家族cl · 发表于 2023-1-27 20:52

LIUZHU 发表于 2023-1-26 19:26
录制宏是否可以得到答案？

已解决了，用shp变量是可以的，subaddress那里少了一个单引号，始终没发现。。。

		自动登录	找回密码
密码			免费注册

[求助] VBA为图形对象插入超链接