創建指向另一個單元格的超鏈接

Question

我想在 VBA 中創建一個超鏈接，單擊時會跳轉到特定的單元格，類似於 HTML 錨鏈接。

例如：

ActiveSheet.Hyperlinks.Add Anchor:=Cells(1, 2), Address:=range("B23"), TextToDisplay:="Test Link"

但是上面的內容不起作用，因為它說找不到地址

Answer 1

您需要Hyperlinks.Add 方法的SubAddress參數，而不是Address 。

with ActiveSheet
    .Hyperlinks.Add Anchor:=.Cells(1, 2), _
                    Address:="", _
                    SubAddress:= .Name & "!$B$23", _
                    TextToDisplay:="Test Link"
end with

Answer 2

試試這樣：

ActiveSheet.Hyperlinks.Add Anchor:=ActiveSheet.Range("E5"), Address:="", SubAddress:="Sheet1!A1", TextToDisplay:="Sheet1!A1"