Форум по VBA и MS Office

VBA, Excel => VBA, макросы в Excel => Тема начата: Посетитель от 08 августа 2024, 16:37

Название: Фильтр не работает ни со знаком <, ни со знаком >
Отправлено: Посетитель от 08 августа 2024, 16:37
Здравствуйте !
Подскажите, пожалуйста, всю голову сломал уже. Ставлю фильтр, который обычно всегда работал:

Range("Q4:Q" & R).AutoFilter Field:=1, Criteria1:="<135", Operator:=xlFilterValues
ActiveSheet.AutoFilter.Range.Offset(1).SpecialCells(xlCellTypeVisible).EntireRow.Delete ' Удаляет выбранные фильтром строки

И ничего. Показывает, что фильтр не выбрал ни одну ячейку. В столбце есть числа и больше 135 и меньше. Замена знаков меньше на больше ничего не даёт. Менял формат текстовый на числовой — тот же результат.
Что неправильно ?
Название: Фильтр не работает ни со знаком <, ни со знаком >
Отправлено: Администратор от 08 августа 2024, 16:39
Нужно удостовериться, что в ячейке число. Вы точно понимаете, что в столбце Q числа?
В ячейке может быть числовой формат, но число может не быть числом.
Ошибки нет в ячейке - зелёный треугольник.
Название: Фильтр не работает ни со знаком <, ни со знаком >
Отправлено: Посетитель от 08 августа 2024, 16:45
В половине ячеек есть зелёный треугольник, в половине — нет.
Название: Фильтр не работает ни со знаком <, ни со знаком >
Отправлено: Администратор от 08 августа 2024, 16:48
Зелёных треугольников ведь не должно быть в столбце Q?
Добейтесь, чтобы в столбце Q не было зелёных треугольников, - чтобы числа стали числами, а потом уже дальше двигаться.
Название: Фильтр не работает ни со знаком <, ни со знаком >
Отправлено: Посетитель от 08 августа 2024, 17:07
Спасибо ! Вопрос решился установкой числового формата для столбца и все числа сместились от левого края в правый. Фильтр заработал.