Поиск  Пользователи  Правила 
Закрыть
Логин:
Пароль:
Забыли свой пароль?
Регистрация
Войти
 
Страницы: 1
RSS
Дополнительный фильтр через макро рекордер, Не срабатывает дополнительный фильтр если его записать через макро рекордер и запустить
 
Коллеги, здравствуйте!

Помогите разобраться.
Пытаюсь сделать макрос для дополнительного фильтра, но он не работает по условиям.
А если это сделать вручную, то все работает.
Делаю вручную, записываю макро рекордером, запускаю макрос и он не работает, точнее работает, но фильтрует не по всем условиям.
В строках A1:H7 условия для фильтра
Со строки H7 данные для фильтрации.


Файл пример во вложении. Код ниже.

Код
Sub Макрос3()

On Error Resume Next
ActiveSheet.ShowAllData
    Range("A7:H23").AdvancedFilter Action:=xlFilterInPlace, CriteriaRange:= _
        Range("A1:H4"), Unique:=False
End Sub
 
lextoys,Что бы заработало вам надо:
1) В таблице с данными сделать числа записанные как текст числами
2) В таблице условий записывать дробные числа используя как разделитель целого и дробного "." (Точку) а не "," (запятую)
Изменено: Александр П. - 14 янв 2021 09:09:10
 
Спасибо, заменил в условия запятую на точку, все работает.
Страницы: 1
Читают тему (гостей: 1)
Наверх