nnsea 发表于 2019-10-19 16:25:49

把超链接的地址提取出来


Function GetAdrs(Rng)

   Application.Volatile True

   With Rng.Hyperlinks(1)

       GetAdrs = IIf(.Address = "", .SubAddress, .Address)

   End With

End Function
页: [1]
查看完整版本: 把超链接的地址提取出来