Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - Общий форум

Страница: 1 |

 

  Вопрос: Создание гиперссылки Добавлено: 08.02.06 11:40  

Автор вопроса:  shalun
Доброго времени суток.
Хочу узнать как в MS Excel сделать "умную" гиперссылку

Лист 1 содержит ячейку с записью "абвгд"
Лист 2 так же содержит такую запись

Как сделать гиперссылку на листе 1 таким образом, чтобы она всегда выдавала ячейку с "абвгд" на листе 2.

примеч. На листе 2 ячейка "абвгд" постоянно пменяет координаты.

Ответить

  Ответы Всего ответов: 2  

Номер ответа: 1
Автор ответа:
 SerJ



Вопросов: 24
Ответов: 332
 Профиль | | #1 Добавлено: 08.02.06 22:57
В коде первого листа вставляешь:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Target.Row = 2 And Target.Column = 2 Then SelectTarget 2, "C3"
End Sub

в коде модуля:
Public Sub SelectTarget(tgSheet As Integer, tgRange As String)
    Sheets(tgSheet).Activate
    Range(tgRange).Select
End Sub

Поменяв некоторые значения - получишь то, что тебе надо. В данном примере "абвгд" находится на первом листе в ячейке B2, а на втором листе - в ячейке С3.
примеч. На листе 2 ячейка "абвгд" постоянно пменяет координаты.

Это как? Программным путём или какой-то юзер меняет?
Код, что я дал будет работать только в фиксированном положении целевой ячейки. Обьясни подробнее, допишу и для "меняющей координаты ячейки"

Ответить

Номер ответа: 2
Автор ответа:
 Victor



ICQ: 345743490 

Вопросов: 42
Ответов: 385
 Web-сайт: vt-dbnz.narod.ru
 Профиль | | #2
Добавлено: 10.02.06 16:55
Если я правильно понял проблему, то можно сделать так:
Берем Лист2. Суем на него "абвгд".
Справа сверху, прямо над областью просмотра листа есть combobox, показывающий имя выделенной ячейки (или диапазон).

Выделяешь ячейку с абвгд, переводишь курсор в этот комбобокс и пишешь туда имя. Например "abcde".

Открываешь Лист1, пишешь в нужной ячейке "=abcde".

Если таскать мышкой ячейку на Лист2, то она будет перемещаться вместе со своим именем.

Ответить

Страница: 1 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам