Отображать гиперссылочный текст

Question

Я пытаюсь отобразить значение гиперссылки в другой ячейке. Например, у меня есть столбец, содержащий несколько гиперссылок, каждая из которых связана с определенной ячейкой в ​​других листах. Я бы хотел, чтобы всякий раз, когда кто-то нажимает на гиперссылку, это значение (текст) отображалось в другой ячейке на моем основном листе.

Я пытался ввести VBA для getUrL, но это дало мне тот результат, который я искал. Дайте мне знать, если кто-то может предоставить решение для этого.

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