Frankenstine
@Frankenstine
Сисадмин

Как работает Selection.AutoFilter?

Есть экселевский лист:
A | B | C | D ...
<шапка таблицы>
номера | Значение№ | пусто | Фамилии | ...
Есть такой говнокод макроса:
Sub Id_obj()
    Sheets("Лист1").Select
    Application.ScreenUpdating = False
    Dim Balon As Integer
    Balon = Sheets("Лист1").Range("CF6")
    Select Case Balon
            Case 1
                 Selection.AutoFilter Field:=1, Criteria1:="Значение1"
                 Selection.AutoFilter Field:=3, Criteria1:="<>"
            Case 2
                 Selection.AutoFilter Field:=1, Criteria1:="Значение2"
                 Selection.AutoFilter Field:=3, Criteria1:="<>"
...

Совершенно не понимаю как и почему оно работает в одном файле (скрывает строчки с пустыми значениями в столбце D и оставляет только с указанным в CF6 значением в столбце B) и не работает (скрывает все строки) в другом таком же (что поломалось).
Что конкретно я не понимаю:
1) Какие ячейки выбираются Selection.AutoFilter?
2) как я панимаю всё остальное растёт из первого :)
  • Вопрос задан
  • 961 просмотр
Пригласить эксперта
Ваш ответ на вопрос

Войдите, чтобы написать ответ

Войти через центр авторизации
Похожие вопросы
ЛАНИТ Москва
До 80 000 руб.
ProfitClicks Краснодар
от 80 000 руб.
СМАРТ-СОФТ Волгоград
от 60 000 до 90 000 руб.
21 сент. 2019, в 08:59
35000 руб./за проект
21 сент. 2019, в 00:13
5000 руб./за проект