excel到处链接

Function myHyperlink(Target As Range) As String
    Application.Volatile True
    myHyperlink = Target.Hyperlinks(1).Address
End Function
posted @ 2011-04-30 10:29  心的开始  阅读(302)  评论(0编辑  收藏  举报