Помощь в создании навигатора по большой таблице

[Blondy]

Дорогие спецы по VBA, мне нужно сделать что-то вроде навигатора по большой таблице с адресами строительных объектов. Именно средствами VBA. Фильтрация или сортировка по алфавиту не подходят из-за специфики документа.
Идея в следующем - человек выбирает адрес из отдельного списка, и в зависимости от значения индексной ячейки, курсор переходит на определенный диапазон основной большой таблицы. Часть кода прописано, но в нем явно чего-то не хватает. Я не спец по VBA, что смогла найти в теории, накрутила - не могли бы Вы дополнить код? Бьюсь над этой проблемой уже неделю, перепробовала множество вариантов, а не работает(((((( Я читала в теории что должно где-то стоять GoTo.Aplication а где?
Во вложении - простенький пример документа, так сказать "опытный образец", сама таблица намного серьезнее))) . VBA код рядом на зеленом поле, индексная ячейка также выделена зеленым.
Вот отдельно VBA код, для тех кто может увидев листинг, сразу найти, что дописать:
Sub Demo1 ()
Dim N as Integer
N:=Val("E24")

IF N=3 then
Reference:= ActiveSheet.Range("A5:A6"),
Scroll:=True
End IF
End Sub


И скажите еще, если не трудно - как сделать так, чтобы вспомогательный список, решенный мной через Forms ListBox был не таким статическо-зависшим, а как бы выпадающим, и его можно было при случае свернуть в одну полоску.

[pivas]

Попробуйте начать с этого:

[Blondy]

Извините меня, но я не очень поняла для чего нужен этот хитрый ход?)))
А насчет кода как?)))

Я почему-то думала, что написать код для этого навигатора - хотя бы рыбу - легко, тем более спецам..... Но судя по количеству отзывов не так просто ларчик открывается.

[pivas]

Откройте ларчик сами исходном коде 1 листа

[Blondy]

Ой, Игорь, я не могу Вас попросить об одной любезности - не могли бы Вы переслать мне эту правленную Вами табличку только в обычном, а не сжатом виде на мой E-mail starnight2004@yandex.ru Я сейчас просто нахожусь за компьютером, где RAR нету(((( Буду ларчик открывать)))