Excel 构造超链接和提取超链接的网址

构造 超链接

HYPERLINK(D1,C1)

提取 超链接

1、sheet页→右键→查看代码
2、粘贴如下代码，并保存

Sub link()
    Dim hl As Hyperlink
    For Each hl In ActiveSheet.Hyperlinks
        hl.Range.Offset(0, 1).Value = hl.Address
    Next
End Sub

3、工具栏→运行→运行子过程
4、可以查看到已提取所有超链接地址 （ 覆盖的方式写在超链接的右边一列）

参考
如何批量插入和提取超链接？
Excel批量提取超链接网址

批量打开多个链接

1、Alt+F11 → 插入 → 模块
2、插入代码 → 保存

Sub 打开网页()
For Each A In Selection
Shell ("C:\Users\zhang\AppData\Local\Google\Chrome\Application\chrome.exe -url " & A.Value)
Next
End Sub

3、 Alt+F8 → 执行

参考：Excel—如何快速打开Excel中的多个链接/网址