Запуск макроса Excel по гиперссылке Нажмите

Question

Я пытаюсь назначить макросы гиперссылкам, которые я установил в excel. У меня есть гиперссылки, ссылающиеся на ту же ячейку, которая содержит гиперссылку. Основываясь на примерах кода, я обнаружил, что пришел к этому коду:

Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink) 

Select Case Target.Range.Address 

Case "$B$3" 
    MsgBox ("Test") 
Case "$Z$3" 
    MsgBox ("Test") 
Case Else 
    Exit Sub 
End Select 

End Sub 

Ничего не происходит, когда я нажимаю любую гиперссылку. Я тоже попробовал запустить Application.EnableEvents = True и все еще не могу ничего убрать. Кроме того, я проверил, что блок кода установлен в правильном листе листа. Любая помощь будет оценена по достоинству. Благодаря!

EDIT: Вот ScreenCap диалога гиперссылок в качестве примера для гиперссылок я настроил:

Я попытался как «Z3» и $ Z $ 3 адрес (как способы направить меня в камеру должным образом, он просто не срабатывает макрос.)

Answer 1

Ваш код работает если код находится в области рабочего листа кода

правой кнопкой мыши на вкладку A т дно и: