ReSQL.ru
     
powered by simpleCommunicator - 2.0.53     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Поиск ячеек, содержащих не дату
7 сообщений из 7, страница 1 из 1
Поиск ячеек, содержащих не дату
    #38119135
Frost_Imp
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Frost_Imp
Участник
Комрады, добрый день!
Прошу помощи в синтаксисе запроса.
Стандартный код поиска, аналогичный вызову окна (ctrl + F), который ищет ячейки с датами по шаблону, выглядит так:
Код: plaintext
1.
2.
3.
    Selection.Find(What:="??.??.????", After:=ActiveCell, LookIn:=xlValues, _
        LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
        MatchCase:=False, SearchFormat:=False).Activate


Каким образом изменить этот код, чтобы он искал ячейки, НЕ содержащие дату по шаблону ??.??.???? ?
То есть не обязательно дату иного формата, результатом поиска может быть и текст тоже
_____________________
А что на самом деле хотел сказать "Frost_Imp" никто не знает, так как администрация форума попросила его быть вежливым.
...
Рейтинг: 0 / 0
22.01.2013, 10:39
| Ответить | Цитировать | Написать  
Поиск ячеек, содержащих не дату
    #38119220
Фотография AndreTM
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AndreTM
Участник
А вы уверены? Этот метод у вас найдет по такому шаблону только "текст, выглядящий как дата". Ячейки же с датами он найдет в том случае, если системный формат отображения дат соответствует этому шаблону, причем найдет невзирая на то, как они отображаются в ячейке.
Так что, прежде чем изменять поисковое выражение - надо определиться, в каких данных роемся
...
Рейтинг: 0 / 0
22.01.2013, 11:22
| Ответить | Цитировать | Написать  
Поиск ячеек, содержащих не дату
    #38119291
Frost_Imp
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Frost_Imp
Участник
AndreTM, скажем так, мне нужно найти все, что отличается от шаблона. Дата, числа, текст - без разницы.
Просто я планирую удалять строки с этими данными, чтобы осталась только дата (или текст, похожий на дату) в формате ??.??.????
...
Рейтинг: 0 / 0
22.01.2013, 11:48
| Ответить | Цитировать | Написать  
Поиск ячеек, содержащих не дату
    #38119487
Фотография VSVLAD
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
VSVLAD
Участник
Frost_Imp,

по всему ренжу который имеет данные в цикле проверять isDate() которая вернёт False...
...
Рейтинг: 0 / 0
22.01.2013, 13:08
| Ответить | Цитировать | Написать  
Поиск ячеек, содержащих не дату
    #38119593
Frost_Imp
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Frost_Imp
Участник
VSVLAD, мне бы в рамках приведенного выше кода, я не гуру vba
...
Рейтинг: 0 / 0
22.01.2013, 13:45
| Ответить | Цитировать | Написать  
Поиск ячеек, содержащих не дату
    #38120561
скукотища
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
скукотища
Гость
Frost_Imp,
у экселевского Find нет такого функционала.
Если данные находятся в одном столбце - можно автофильтром воспользоваться. В "рамках приведенного выше кода":
Код: vbnet
1.
2.
3.
4.
5.
Selection.AutoFilter Field:=1, Criteria1:="<>*??.??.????*"
If Selection.Offset(1).Value <> "" then 
    Selection.Offset(1).Activate
Else: MsgBox "Not has data that is look 'not like date'", vbInformation
End If
...
Рейтинг: 0 / 0
22.01.2013, 23:40
| Ответить | Цитировать | Написать  
Поиск ячеек, содержащих не дату
    #38120948
Frost_Imp
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Frost_Imp
Участник
скукотища, благодарю! Попробую
...
Рейтинг: 0 / 0
23.01.2013, 11:24
| Ответить | Цитировать | Написать  
7 сообщений из 7, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Поиск ячеек, содержащих не дату
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
NoSQL.ru       Новости, Чат       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=60&msg=38119220&tid=2157198]:
 0ms
get settings:
 7ms
get forum list:
 13ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 59ms
get topic data:
 8ms
get forum data:
 2ms
get page messages:
 41ms
get tp. blocked users:
 1ms
others: 14ms
total:  151ms
созд. / загр.: 151ms
x
x
Закрыть


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