Войти

Показать полную графическую версию : Существует ли оператор обратный оператору Like ?


Большой Кол
02-11-2009, 11:52
САБЖ
Нужно чтобы в таблице удалялись лишние записи. Те что нужны легко находятся оператороми цикла, сравнения и , внутри, опрератором Like.
Например

For ciclOfCerch = 1 To 500
If Range(marcOfStringForDelite1).Text Like "СТРОКА ПОИСКА" Then Rows(marcOfStringForDeliteAll).Delete Shift:=xlUp
Next ciclOfCerch

Однако нужно что бы удалялись именно строки не похожие на СТРОКА ПОИСКА, а совсем наоборот, т.е. нужно как-то написать
If Range(marcOfStringForDelite1).Text not Like "СТРОКА ПОИСКА"
Но это вызывает синтаксическую ошибку, может есть обратный оператор?

pva
02-11-2009, 14:51
If not Range(marcOfStringForDelite1).Text Like "СТРОКА ПОИСКА"

Большой Кол
02-11-2009, 15:59
Огромное спасибо, с меня ящик водки

Olga_F
27-10-2010, 00:47
Спасибо!
Мне очень помог, совет заработало. :yahoo:
Раньше пользовалась " <>0" но не всегда прокатывало!
:Beer:




© OSzone.net 2001-2012