Создание и редактирование автофильтров в эксель

Страница 1 из 1 1
Модератор форума: китин, _Boroda_, DrMini

Создание и редактирование автофильтров в эксель (Формулы/Formulas)

Анатолий8383

Дата: Понедельник, 15.01.2018, 10:51 | Сообщение № 1

Группа: Пользователи

Ранг: Прохожий

Сообщений: 1

Репутация: 0 ±

Замечаний: 0% ±

2010

Здравствуйте уважаемые форумчане, есть фильтр (макрос эксель), такого вида

макрос фильтр 1

Rows("31:31").AutoFilter
Range("AN31:AN1670").AutoFilter Field:=1, _
Criteria1:="<=" & CDbl(DateSerial(Year(Date), Month(Date) + 1, 1))
и

макрос фильтр 2

Rows("31:31").AutoFilter
Range("AO31:AO1670").AutoFilter Field:=1, _
Criteria1:=">=" & CDbl(DateSerial(Year(Date), Month(Date) + 1, 1)), Operator:=xlAnd, _
Criteria2:="<=" & CDbl(DateSerial(Year(Date), Month(Date) + 3, 0))

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

Вставка дополнительного фильтра после "макрос фильтр 1" или "макрос фильтр 2" не помогает, выдает ошибку. А если по новой запускаешь автофильтр то сбрасывается старый. Т.е. эти фильтры не запускаются со стандартными автофильтрами.
Заранее спасибо за ответ

Заранее спасибо.

Ответить

Nic70y

Дата: Понедельник, 15.01.2018, 15:10 | Сообщение № 2

Группа: Друзья

Ранг: Экселист

Сообщений: 9130

Репутация: 2415 ±

Замечаний: 0% ±

Excel 2010

Анатолий8383,
нужно код оформить тегами,
приложить файл

ЮMoney 41001841029809

Ответить

Создание и редактирование автофильтров в эксель (Формулы/Formulas)

Страница 1 из 1
1