Автоматическая фильтрация таблицы с помощью ComboBox

У меня есть три ComboBoxes, которые заполнены числами, и я пытаюсь отфильтровать таблицу при вызове следующего макроса. Проблема в том, что различные тесты он фильтрует правильно, а затем возвращает пустую таблицу со всеми пустыми строками. ComboBoxes загружены правильно, в таблице есть строки, соответствующие критериям в тесте.

Sub AutoFilter ()

Worksheets("Sheet1").ComboBox1.Value If Worksheets("Sheet1").ComboBox1.Value <> "" Then ActiveSheet.ListObjects("Table").Range.AutoFilter Field:=1, Criteria1:=number1 If Worksheets("Sheet1").ComboBox2.Value <> "" Then ActiveSheet.ListObjects("Table").Range.AutoFilter Field:=2, Criteria1:=number2 If Worksheets("Sheet1").ComboBox3.Value <> "" Then ActiveSheet.ListObjects("Table").Range.AutoFilter Field:=3, Criteria1:=number3 

Что может быть неправильным?

Interesting Posts

excel – сохранение в виде csv изменений формата и данных

Рабочий лист_Изменить Никогда

Как обрабатывать недопустимые символы в OleDb Excel import?

Excel VBA Сравните два списка в Листе 1 и 2 Столбец А, затем объедините соседние ячейки спичек в листе

Excel не читается, когда я объединял ячейки

Передача 1 из 3 значений в Sub

Как перейти к следующему шагу в VBA, если условие не выполнено

как использовать совпадение индекса из одного файла в другой файл в vba

ThisWorkbook не имеет значения глобальной переменной для отмены ontime ()

Условное форматирование с набором значков и формулой

Выделить значение из ячейки как формат

Excel Настроить столбец на основе выбора выпадающего списка

нахождение минимального положительного значения (больше 0) в массиве в VBA

Как автоматически загружать флажок, если ячейка заполнена?

Замените запятые в ячейке в excel с другим текстом в Excel

Давайте будем гением компьютера.