excel vba +他のブックへのハイパーリンク

Question

私はworkbookAを持っています。私はworkbookAからworkbookBへ情報をコピーするマクロを実行します。すべての行にハイパーリンクを追加したいので、この行がworkbookAのどこにあるのかを見つけることができます。しかし、私はそれを働かせることはできません。同じワークブックではあるが異なるシートでは機能します。

マイコード：

Set rw = sh.rows(i) 
Set targetCell = rw.Cells(1, "R") 
wbB.Sheets("Sheet1").Hyperlinks.add Anchor:=rng.EntireRow.Cells(1, "A"), Address:="", SubAddress:="='" & sh.name & "'!" & targetCell.Address & "", TextToDisplay:="Link" 

送信！

Answer 1

異なるブックを開くために、ハイパーリンクを使用するには、次のような何か必要があります：

リンクがワークシートに配置する必要がどこアンカーは、アドレスがあることをあなたのワークブックの名前です

wbB.Sheets("Sheet1").Cells(10, 1).Hyperlinks.Add Anchor:=wbB.Sheets("Sheet1").Cells(10, 1), Address:="Your.xlsm", SubAddress:="Sheet1!A10", TextToDisplay:="Link" 

をSubAddressは、開いたときに選択する必要があるシートと範囲です。