Добрый день. Подскажите, что добавить в этот код чтобы по мимо этого диапазона "магазины", так же фильтрация происходила на другом листе в диапазоне "магазины2".

Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)    ActiveSheet.Range("магазины").AutoFilter 1, Target.TextToDisplay End Sub

Добрый день.
Решить эту проблему удалось только переносом заполненной области на новый лист . Удаление строк/Сохранение файла не дает результата. Как пример, выложил файл на облачный диск. Если есть возможность дайте комментарий, как эту проблему решать без переноса? Нужно понять причину.

https://disk.yandex.ru/d/GWDVzPU2z-cslw