VBA:基于列范围解析超链接

时间:2019-03-06 03:26:36

标签: excel vba

我有以下脚本要复制并根据数组进行过滤。在范围B:B中,我有要解析为另一列范围的链接,比如说在BM:BM列中,但我不确定它是否可以合并到第一个脚本中

baz

Function GetURL(Rng As Range) As String
    On Error Resume Next
    GetURL = Rng.Hyperlinks(1).Address
End Function

1 个答案:

答案 0 :(得分:1)

您可以添加以下代码:

wsDest.Range("BM1:BM200000").Formula = "=HYPERLINK(B1,B1)"

此行之后:

wsDest.Cells(1, 1).PasteSpecial

我建议您先尝试使用较少的行进行测试,然后再尝试使用整个数据集。