[VBA] excel获取单元格的超链接地址函数 Function geturl(c As Range) As String geturl = c.Hyperlinks(1).Address End Function 设置超链接的函数是HYPERLINK。