如何將單元格引用列表轉換爲其他工作表中的單元格爲超鏈接

Question

我有一個摘要工作表，其中包含對同一工作簿中其他工作表的引用。引用是簡單的公式（即= Sheet2！D23）。我想將這些轉換爲超鏈接。我希望超鏈接顯示引用單元格的值。

我可以單獨做到這一點，但電子表格很大，並有數百個這些參考。

有人可以建議一個更簡單的方法批量轉換這些引用超鏈接？

Answer 1

選擇包含要鏈接的單元格的範圍，然後運行此宏。
它只會鏈接駐留在不同工作表上的值，不會鏈接到當前工作表上的單元格。如果您想鏈接所有單元格，即使該值來自同一張表格，只需刪除圍繞rng.Hyperlinks.Add rng, "", Replace(rng.Formula, "=", "")的If..End If包裝。

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