If (Cells(i, 1).Value Like "*Прих*" Or "*Пере

[sonata]

Код: Выделить всё

If (Cells(i, 1).Value Like "*Прих*" Or "*Пере*") Then

Вызывает ошибку...
Как задать условие или-или?
Можно ли так с Like?

[Vitaly1]

Вот как надо:

If instr(Cells(i, 1).Value,"Прих")<>0 Or instr(Cells(i, 1).Value,"Пере")<>0 Then