Excel VBA: FollowHyperlink

'Excel VBA: FollowHyperlink

Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)
    If Target.Range.Address = "$A$4" Then
        MsgBox "Write your Code here to be executed"
    End If
End Sub