EXCEL URL提取宏程序

1、打开要是用的Excel文件

2、右击sheet页签名称，点击“查看代码”

3、在打开的界面中拷贝如下代码：Sub ExtractHL() Dim HL As Hyperlink For Each HL In ActiveSheet.Hyperlinks HL.Range.Offset(0, 1).Value = HL.Address NextEnd Sub

4、点击，运行。

5、已经提取出所有URL

6、分享完毕，欢迎小伙伴随时交流。