在VBA中打开超链接

Question

我有一个excel文件.在第一个工作表中有一些超链接行(相对文件路径=文件位于excel文件旁边).

在VBA中,我将获取包含超链接的单元格.如何在VBA中打开后跟超链接的文件？其实我想打开超链接(实际打开文件)

Answer 1

如果工作表中的超链接在=hyperlink()公式中,我们:

• 抓住公式
• 解析它以获取网址
• 按照超链接:

这是代码:

Sub ClickByVba()
    ary = Split(ActiveCell.Formula, Chr(34))
    ActiveWorkbook.FollowHyperlink Address:=ary(1)
End Sub

这适用于Web链接和文件链接.
如果链接指向文件,则文件将被打开(如果尚未打开)并且将进行跳转.