扫码下载APP
及时接收最新考试资讯及
备考信息
【问题】
如何取得单元格的超链接地址?
【解答】
可以用自定义函数,代码如下:
Function GetLink(rng As Range) As String
Application.Volatile
If rng.Cells(1, 1).Hyperlinks.Count = 0 Then
GetLink = "No Hyperlink"
Else
If rng.Hyperlinks(1).Address = "" Then
GetLink = rng.Hyperlinks(1).SubAddress
Else
GetLink = rng.Hyperlinks(1).Address
End If
End If
End Function
上一篇:快速定位单元格实例
Copyright © 2000 - www.chinaacc.com All Rights Reserved. 北京正保会计科技有限公司 版权所有
京B2-20200959 京ICP备20012371号-7 出版物经营许可证 京公网安备 11010802044457号