Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Автофильтр врёт / 12 сообщений из 12, страница 1 из 1
21.01.2009, 15:22:58
    #35769637
VladimirSk
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Автофильтр врёт
Добрый день!
Подскажите! Как бороться с таким казусом:
таблица, в ней столбец дата время типа 12.01.2009 13:15 - время события нужно выбрать за период и в отчет
Ставим автофильтр выбираем читаем всё ОК
записываем всё в макрос, запускаем скрыты все строки .........?
тут же открываем условие фильтра руками, условие точно как в первом сучае, жмем применить, снова всё ОК
отчего через макрос глючит ?
...
Рейтинг: 0 / 0
21.01.2009, 15:42:03
    #35769706
f
f
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Автофильтр врёт
Может, в макросе что-то с форматом даты не так?
...
Рейтинг: 0 / 0
21.01.2009, 16:02:35
    #35769795
VladimirSk
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Автофильтр врёт
Макрос - записан с автофильтра встроенной функцией записи макросов
...
Рейтинг: 0 / 0
22.01.2009, 01:10:56
    #35770771
SirFisher
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Автофильтр врёт
VladimirSk,

попробуйте использовать не автофильтр, а расширенный фильтр
...
Рейтинг: 0 / 0
22.01.2009, 08:20:43
    #35770922
sergeyvg
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Автофильтр врёт
дата в фильтре
Код: plaintext
    Selection.AutoFilter Field:= 1 , Criteria1:=">" & CDbl(CDate("07.12.2004")), Operator:=xlAnd
...
Рейтинг: 0 / 0
23.01.2009, 09:34:05
    #35773055
VladimirSk
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Автофильтр врёт
sergeyvg,
Огромное СПАСИБО за поддержку
подскажите уж и как время приладить 8:00 например к дате
...
Рейтинг: 0 / 0
23.01.2009, 10:42:54
    #35773190
VladimirSk
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Автофильтр врёт
VladimirSk,

Код: plaintext
Selection.AutoFilter Field:= 3 , Criteria1:="<" & CDbl(CDate("18.01.2009 8:00")), Operator:=xlAnd
При участии времени нет скрытых строк хотя всё выделенно -синенькое
а данные имеют вид 12.13.2009 12:23
или 23.12.2009 8:34
...
Рейтинг: 0 / 0
23.01.2009, 11:02:39
    #35773234
VladimirSk
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Автофильтр врёт
VladimirSk,

При указании даты без времени и прогонке кода,
видна дата в автофильтре,см.картинку
но если время добавить то в автофильтре видна дата в формате Exel видимо, и не работает
...
Рейтинг: 0 / 0
24.01.2009, 09:15:15
    #35775114
sergeyvg
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Автофильтр врёт
со временем где-то так
Код: plaintext
Selection.AutoFilter Field:= 1 , Criteria1:=Replace(">" & CDbl(CDate("07.12.2004 15:58:00")), ",", Application.DecimalSeparator), Operator:=xlAnd
...
Рейтинг: 0 / 0
26.01.2009, 10:15:27
    #35776746
VladimirSk
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Автофильтр врёт
sergeyvg,
К сожалению не влияет совсем
...
Рейтинг: 0 / 0
27.01.2009, 08:11:29
    #35779000
sergeyvg
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Автофильтр врёт
Код: plaintext
1.
2.
Sub test()
  MsgBox (">" & CDbl(CDate("07.12.2004 15:58:00")) & "===" & Replace(">" & CDbl(CDate("07.12.2004 15:58:00")), ",", Application.DecimalSeparator))
End Sub
у меня выдает
>38328,6652777778===>38328.6652777778
а что у вас
...
Рейтинг: 0 / 0
27.01.2009, 08:57:52
    #35779050
VladimirSk
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Автофильтр врёт
sergeyvg,

Орешек знаний тверд !!! однако .
У меня первая попытка с запятыми в обеих частях выражения.
смотрим сервис-параметры-международные :
там разделитель
Код: plaintext
, - без подсветки
т.к. флажек системные настройки стоит
в системе разделитель запятая
снимаем флаг, ставим точку и снова ставим флаг! - заработало всё !!!
Вывод - что же произошло если остались системные настройки ?
Странное повидение однако НО
СПАСИБО ВАМ ЗА ПОДДЕРЖКУ
тем более другим может пригодиться ценный опыт этого исследования с точками, запятыми и временем в атофильтре.
...
Рейтинг: 0 / 0
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Автофильтр врёт / 12 сообщений из 12, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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