如何从 Excel 2010 中的超链接获取 URL？

Question

我有一列单元格包含超链接（指向网址），我需要它们的 URL 为常规文本。有没有办法从超链接中提取 URL？示例：单元格显示：“CLICKME”链接至：www.www.com

我希望单元格中只显示 www.www.com。我探索了选择性粘贴功能，但没有找到任何答案。我知道如何用单个单元格的 URL 替换显示文本，但我的表格中有 700 多个这样的单元格，我需要这样做，我不能花一整天时间一个单元格地做这件事。有什么建议吗？

Answer 1

这很容易虚拟专用网络-

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

运行此程序后，所有地址将出现在超链接右侧的单元格中。