如果是VBA的话
应该是用Activecell.Formula获取整个公式,即=hyperlink("\\server\aaa\aaa.xls","aabbbcc")
然后再用Instr、Left、Mid、Right之类的函数获取链接地址:
theADDR=mid(activecell.Formula,13,instr(activecell.Formula,",")-14)
使用宏表函数,定义名称,如果公式在A1,那么选中B1定义名称
AA=GET.CELL(6,$A1),确定。
B1中输入:=SUBSTITUTE(SUBSTITUTE(AA,"=HYPERLINK(""",""),""",""aabbbcc"")",""),就可以得到结果
可以向下填充
记住 要启用宏,不然宏表函数是无效的