顯示超連結文字

Question

我正在嘗試將超連結文字的值顯示到另一個單元格。例如，我有一列包含多個超鏈接，每個超鏈接都連結到其他工作表中的特定單元格。我想要的是，每當有人點擊超連結時，該值（文字）就會顯示在我的主工作表上的另一個儲存格中。

我嘗試為 getUrL 輸入 VBA，但這給了我想要的結果。讓我知道是否有人能夠為此提供解決方案。

Answer 1

這可以使用 Private Sub Worksheet 函數 FollowHyperlink（即工作表中的 VBA 程式碼）來解決，如下所示：

Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)
    Sheets("MainSheet").Range("E2").Value = Selection.Value
    Sheets("MainSheet").Range("E3").Value = Target.SubAddress
    Sheets("MainSheet").Range("E4").Value = Target.Range
End Sub