[VBA] excel獲取單元格的超鏈接地址函數

Function geturl(c As Range) As String
    geturl = c.Hyperlinks(1).Address
End Function

設置超鏈接的函數是HYPERLINK。