Excel VBA Исходящий адрес ячейки гиперссылки - PullRequest
0 голосов
/ 18 марта 2019

Sub Workbook_SheetFollowHyperlink(ByVal Sh As Object, ByVal Target As Hyperlink)

Можно ли использовать объект Sh для определения адреса исходной ячейки, которая вызвала гиперссылку?Мне нужно знать, из какой ячейки пришла гиперссылка, чтобы помочь некоторым навигационным кнопкам перемещаться назад (и вперед) по ранее нажатым гиперссылкам.

Sh.Name показывает исходный Worksheet.Name, но я не знаюкак добраться по адресу отправителя.

Заранее спасибо за помощь.

1 Ответ

2 голосов
/ 18 марта 2019

Поскольку Target является Hyperlink, Target.Range.Address вернет исходный адрес.

Из документации Hyperlink.Range:

Возвращает объект Range, представляющий диапазон, к которому прикреплена указанная гиперссылка.


Вот проверенный код и результат:

Private Sub Workbook_SheetFollowHyperlink(ByVal Sh As Object, ByVal Target As Hyperlink)
    MsgBox "'" & Sh.Name & "'!" & Target.Range.Address
End Sub

enter image description here

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...