0

我有一个摘要工作表,其中包含对同一工作簿中其他工作表的引用。参考是简单的公式(即=Sheet2!D23)。我想将这些转换为超链接。我希望超链接显示引用单元格的值。

我可以单独执行此操作,但电子表格很大,并且有数百个这样的参考。

有人可以建议一种更简单的方法将这些引用批量转换为超链接吗?

4

1 回答 1

1

选择包含您要链接的单元格的一系列单元格,然后运行此宏。
它只会链接驻留在不同工作表上的值,不会链接到当前工作表上的单元格。如果您想链接所有单元格,即使值来自同一张表,只需If..End If删除rng.Hyperlinks.Add rng, "", Replace(rng.Formula, "=", "").

Sub makeLinks()
    Dim rng As Range
    For Each rng In Selection
        If rng.Formula Like "=*!*" Then
            rng.Hyperlinks.Add rng, "", Replace(rng.Formula, "=", "")
        End If
    Next rng
End Sub
于 2013-03-26T19:40:14.833 回答