如何在excel中提取网址?
假设您从同事那里收到一本 Excel 工作簿,其中一列中有一个超链接列表。现在,您想要从此列表中提取所有超链接 URL。
手动方法确实很头疼,你必须将每个 URL 都一一复制粘贴。所以最好的方法是在VBA中创建UDF 。今天我想与大家分享这个 UDF 的一个简单代码。
用于提取超链接 URL 的 VBA 代码
Function GiveMeURL(rng As Range) As String On Error Resume Next GiveMeURL = rng.Hyperlinks(1).Address End Function
如何使用此代码
要使用此 UDF,您必须执行以下步骤:
- 从“开发人员”选项卡打开 Visual Basic 编辑器或使用键盘快捷键 ALT+F11。
- 插入一个新模块,将上面的代码粘贴到其中并关闭它。
- 现在,在电子表格中输入函数=GiveMeURL(A1)并按 Enter。