有时我们需要为Excel中的图片添加超链接,批量的操作肯定少不了VBA宏。
那么如何使用VBA为图片添加链接呢?示例代码如下:
ActiveSheet.Pictures.Insert(Filename).Select
Set shp = Selection.ShapeRange.Item(1)
ActiveSheet.Hyperlinks.Add Anchor:=shp, Address:=Filename
Filename代表图片链接。Address后面代表图片要跳转的超链接。
参考资料:
Vba add hyperlink to a picture
如您从本文得到了有价值的信息或帮助,请考虑扫描文末二维码捐赠和鼓励。
如本文对您有用,捐赠和留言 将是对我最好的支持~(捐赠可转为站内积分)
如愿意,请向朋友推荐本站,谢谢。
尊重他人劳动成果。转载请务必附上原文链接,我将感激不尽。