powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Работа с AutoFilter
5 сообщений из 5, страница 1 из 1
Работа с AutoFilter
    #34254169
Katerina Iv
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Добрый день

Возникла проблема.
Идея – по активному столбцу фильтр отбирает значения, равные значению активной ячейки.
На столбец «форматом ячеек» установлено «число десятичных знаков» - два.

Selection.AutoFilter Field:=ActiveCell.Column, Criteria1:=ActiveCell.Value

Если значение активной ячейки не имеет два десятичный знак после запятой (например, 2,50) – то фильтр ничего не находит
если два десятичных знака есть (2,55) – все находит. Что надо изменить?

В идеале, если фильтр будет отбирать все значения, равные целому числу активной ячейки, без учета десятичных - например, значение активной ячейки = 2,12; фильтр должен отобрать все значения от 2,00 до 2,99

Заранее спасибо
...
Рейтинг: 0 / 0
Работа с AutoFilter
    #34254746
vkodor
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Katerina Iv

В идеале, если фильтр будет отбирать все значения, равные целому числу активной ячейки, без учета десятичных - например, значение активной ячейки = 2,12; фильтр должен отобрать все значения от 2,00 до 2,99

Заранее спасибо
Код: plaintext
1.
    Selection.AutoFilter Field:= 1 , Criteria1:=">=" & Fix(ActiveCell.Value), Operator:=xlAnd, _
        Criteria2:="<" & Fix(ActiveCell.Value) +  1 
...
Рейтинг: 0 / 0
Работа с AutoFilter
    #34257199
Katerina Iv
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
не оч. поняла...
именно в таком варианте не хочет "фильтровать"
...
Рейтинг: 0 / 0
Работа с AutoFilter
    #34257651
vkodor
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Katerina Ivне оч. поняла...
именно в таком варианте не хочет "фильтровать"
Код: plaintext
1.
Selection.AutoFilter Field:=ActiveCell.Column, Criteria1:=">=" & Fix(ActiveCell.Value), Operator:=xlAnd, _
        Criteria2:="<" & Fix(ActiveCell.Value) +  1 
...
Рейтинг: 0 / 0
Работа с AutoFilter
    #34260022
Katerina Iv
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Спасибо, ГУРУ )
...
Рейтинг: 0 / 0
5 сообщений из 5, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Работа с AutoFilter
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]