Новости:

К первому сообщению темы должен быть прикреплен файл примера в формате xls*.
Приложив пример, Вы избавите себя и других от вопросов типа "А какой критерий?", "А куда выводить результат?", "А сколько строк?" и все тех же просьб выложить файл. Рисовать за Вас Ваши же таблички с заданиями, а затем и решение к ним, никто желанием не горит. Да и, как показывает практика, в большинстве случаев без файла решения не найти.

Главное меню

[url=https://msexcel.ru/content/view/27/2/]_автофильтр_[/url] и десятичное число

Автор Bomont, 24.12.2015, 10:03

« назад - далее »

Bomont

Добрый день, коллеги!

Искал по форумам схожие темы, но везде речь идет о применении дат в макросе с автофильтром - у меня ситуация похожая, но несколько иная.

Проблема в коде
Worksheets("База").Range("B:AD").AutoFilter Field:=9, Criteria1:=">" & Duration1 * (1 - DurationStape / 100) & "", VisibleDropDown:=True

В результате в критерии должно получится десятичное число, после применения у меня в автофильтре стоит число целое. Т.е. Excel отсекает в числе запятую и делает число целым. Стандартный символ в Excel  у меня запятая.
Если в критерии поставить ссылку на ячейку где предварительно заменить в числе запятую на точку и сделать ячейку текстом - то макрос с автофильтром работает!

Вопрос, как уже в макросе поставить преобразование числа "Duration1 * (1 - DurationStape / 100)" так, чтобы вместо запятой стояла точка? Есть какой то вариант?

cheshiki1


Bomont

К сожалению результат такой же, число превращается в целое (запятая просто исчезает в автофильтре)

kuklp

Как вариант:
Replace(str, ",", ".")
А вообще надо выкладывать пример согласно правил.
Я, как всегда, чертовски адекватен... Email: pilipnikop@yandex.ua WM Z206653985942, R334086032478, U238399322728, E332314026771

Bomont

#4
Цитата: KuklP от 24.12.2015, 10:18Replace(str, ",", ".")
Спасибо, это заработало!