Добрый вечер. Пытаюсь осваивать VBA, а именно гиперссылки а автофильтр. Есть задача: с 1-ого листа гиперссылки введу на остальные и при переходе срабатывает автофильтр. Но если я указываю это в Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink) на том листе куда ведет гиперссылка, то код автофильтра не срабатывает.
При указании в листе где гиперссылка, работает при 1 ссылки, при добавлении 2-ой валится с ошибкой.
При указании для книги, не делал, но думаю ничего хорошего.
Вопрос как заставить работать автофильтр именно на том листе КУДА ссылается гиперссылка?
Есть какие-то идеи или предложения?
Вся справочная информация принимается и прочитывается на ура!
P.S. листов может быть много.
P.S.S. Возможно ли гиперссылка с последующим автофильтром между разными книгами или только с записью макросов в книгу PERSON?

Насколько я понял, это событие при вызове листа книги. В фильтрах используются данные расположенные в определенных местах от гиперссылки и если сменить лист вручную, то данных для фильтра не будет. Так что необходимо смотреть именно переход по гиперссылке.

На свежую голову с утра решение найдено.
В событие Worksheet_FollowHyperlink - на листе ГДЕ находится гиперссылка пишется проверка на имя или какой-либо другой параметр листа на КОТОРЫЙ ссылается и для каждого листа необходимо четко определить правила, если совпадающие то указать в условии все листы где его можно применить.

If ActiveSheet.Name = "Лист2" Then
ActiveSheet.Range("$A$1:$D$6").AutoFilter Field:=1, Criteria1:=Target.Range.Offset(0, -3)
ActiveSheet.Range("$A$1:$D$6").AutoFilter Field:=2, Criteria1:=Target.Range.Offset(0, -2)
End If

дальше все работает. IF можно заменить на CASE.
Ушел тренироваться на реальных записях...

Поставит это хорошо, но отфильтровать по 2-ум данным которые сдвинуты относительно гиперссылки при учете что гиперссылок много, и данные для каждой сдвинуты на разные интервалы функция сможет?
или придется так же определять с какого места идет гиперссылка.
Самый факт, это необходимо сделать 1 раз в файле шаблона, дальше просто Excel обновляется из БД при необходимости и в шаблоне четко буду знать наименование и структуры листов.
Но спасибо за идею, она более универсальна будет время, попробую разобраться.