利用EXCEL批量提取超链接

打开宏工具时excel 2013 可能提示无法打开，需要解决VBE6EXT.OLB无法加载的问题

打开C:\Program Files\Common Files\Microsoft Shared\VBA(Office版本不同可能会略有不同);
打开VBA文件夹，里面有两个子文件夹：VBA6和VBA7;
打开VBA6文件夹，将里面的VBE6EXT.OLB复制到VBA7文件夹里;
打开VBA7文件夹，将里面的VBE7.DLL复制到VBA6文件夹里;
重新运行Office软件。

使用宏来完成超链接提取，步骤如下：
excel菜单栏——工具——宏——Visual Basic编辑器（或使用Alt+F11调出Visual Basic编辑器）。
Visual Basic编辑器菜单栏——插入——模块，复制以下代码插入：
Sub ExtractHL()   Dim HL As Hyperlink   For Each HL In ActiveSheet.Hyperlinks       HL.Range.Offset(0, 1).Value = HL.Address    NextEnd Sub
Visual Basic编辑器菜单栏——运行——运行子过程/用户窗体。
此时，EXCEL表格内有超链接的单元格右边的单元格则会出现超链接的地址，复制即可。