ActiveX- возможность перехода по листу при нажатии на элемент списка

Пользователь

Сообщений: 2 Регистрация: 28.02.2017

28.02.2017 12:43:42

Добрый день!Есть прайс с запчастями, на одном листе запчасти а на другом содержание! Хочу сделать что бы содержание было на 1вом листе выпадающем списке. при нажатии на элемент списка происходила прокрутка как при гипперссылке! (группы пронумерованы)

кто поможет буду благодарен

Прикрепленные файлы

пример.xlsx (14.2 КБ)

Изменено: RuslanOvcharov - 28.02.2017 13:59:13

Юрий М

Модератор

Сообщений: 60982 Регистрация: 14.09.2012

Контакты см. в профиле

28.02.2017 13:00:06

tmmp, несколько моментов:
1. Вы тот текст, который должен быть в сообщении, поместили в заголовок. Это неправильно. Исправил.
2. Поменяйте в своём профиле ник: ну что это - одни согласные...
3. Не нужны на форуме большие файлы и не очень любят форумчане бегать по ссылкам: создайте небольшой файл аналог и прикрепите его к стартовому сообщению.

RuslanOvcharov Пользователь Сообщений: 2 Регистрация: 28.02.2017	#3 28.02.2017 14:02:08 Юрий М,пронумеровал!!но все равно в оригинале у всех них будет неповторяющие имя

Юрий М

Модератор

Сообщений: 60982 Регистрация: 14.09.2012

Контакты см. в профиле

28.02.2017 14:06:15

Цитата
RuslanOvcharov написал: в оригинале у всех них будет неповторяющие имя

Тогда эти имена и нужно собирать в КомбоБокс.
Вот вариант, если группы будут пронумерованы Группа 1, Группа 2, и т.д.

Код

Private Sub ComboBox1_Change()
Dim Rng As Range, ValCombo
    ValCombo = ComboBox1.List(ComboBox1.ListIndex, 0)
    Set Rng = Columns(1).Find(what:="*" & ValCombo, LookIn:=xlValues, LookAt:=xlWhole)
    If Not Rng Is Nothing Then Rng.Select
End Sub

Читают тему