ハイパーリンクテキストを表示する

ハイパーリンクテキストを表示する

ハイパーリンクされたテキストの値を別のセルに表示しようとしています。たとえば、複数のハイパーリンクを含む列があり、各ハイパーリンクは他のシートの特定のセルにリンクされています。ハイパーリンクをクリックするたびに、その値 (テキスト) がメイン シートの別のセルに表示されるようにしたいのです。

getUrL の VBA を入力しようとしましたが、求めていた結果が得られませんでした。この問題の解決策を提供できる方がいらっしゃいましたら、お知らせください。

答え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

ここに画像の説明を入力してください

関連情報