Как сделать авто переход на заданную мной ячейку без гиперссылки?

[sunsunich]

Необходимо чтобы при нажатии на ячейку Е4 меня перекидывало на ячейку Е89,но без добавления гиперссылки на Е4,т.к. мне не нужна привязка к одному конкретному эксель файлу,нужна именна привязка к Е89, потому что файлов будет много.
Необходимо для того что бы быстро просмотреть результаты т.к. в Е4 у меня просто 2 варианта ответа(Да;Нет),а в Е89 у меня цифровые значения и необходимо если в Е4 у меня ответ - Нет,сразу узнать какое число стоит в ячейке Е89
Зараннее благодарен

[DiemonStar]

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  If Target Is Nothing Then
    Exit Sub
  ElseIf Target.Address = [E4].Address And IsNumeric([E4]) Then
    If not [E4] Then
      [E89].Select
    End If
  End If
End Sub

вставляете макрос в код листа.

p.s. немного подправил

[Казанский]

Ответил в первой теме

[sunsunich]

Спасибо спасибо

[sunsunich]

Сообщение от DiemonStar

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  If Target Is Nothing Then
    Exit Sub
  ElseIf Target.Address = [E4].Address And IsNumeric([E4]) Then
    If not [E4] Then
      [E89].Select
    End If
  End If
End Sub

вставляете макрос в код листа.

p.s. немного подправил

не работает,или я чтото неправильно делаю
мои действия:
-кнопка создать макрос+ок
-кнопка макрос-изменить
-удаляю все что там есть
-вставляю ваш макрос(ваш код)
-нажимаю Ctrl+s(сохранить),вылетает окно предупреждение о конфеденциальной информации,нажимаю ОК
-вылетает окно Can't perform requested operation
-закрываю visual basic
-возвращаюсь в эксель,нажимаю на Е4,ничего не происходит

[DiemonStar]

- нажимаете Alt-F11
- выбираете нужный лист в менеджере проекта
- по правой кнопке выбираете ViewCode
- вставляете туда макрос

[sunsunich]

Сообщение от DiemonStar

- нажимаете Alt-F11
- выбираете нужный лист в менеджере проекта
- по правой кнопке выбираете ViewCode
- вставляете туда макрос

опять нечего не происходит

[Казанский]

Код работать не будет, т.к.
в Е4 у меня просто 2 варианта ответа(Да;Нет)
, а переход в коде делается только при числовом значении ячейки.

sunsunich,
может, в соседнюю ячейку, скажем, Е5, подтянуть значение, просто или по условию?
=E89
=ЕСЛИ(E4="Нет";E89;"")

[Казанский]

Как вообще в Е4 появляется Да/Нет? Это результат расчета или вводится пользователем?
Если результат расчета, то можно вместо Нет выводить значение E89. А код в этом случае вообще работать не будет.