Put in a "Pendente" cell if it has any word or phrase other than a group of words

Frequent Visitor

Dear, 

 

I need to create a VBA Code that I read the each cell on column and if it contains word or phrase other than a group of words or phrase, return "Pendente".

 

Example

words = 'Execução ok', 'EXECUCAO OK', ' Nº da Apólice já cadastrada'

 

EXECUÇÃO OKSem pendência
EXECUÇÃO OKSem pendência
vazioPendente
vazioPendente
vazioPendente
vazioPendente
vazioPendente
['Campos inválidos[Campo 7 conteúdo 07019430262 inválido.]', 'EXECUCAO OK', ' Nº da Apólice já cadastrada', ' Número da Apólice já cadastrado', '']Pendente
['EXECUÇÃO OK', 'Nº da Apólice já cadastrada']Sem pendência
['EXECUÇÃO OK', 'Nº da Apólice já cadastrada','Campos inválidos[Campo 7 conteúdo 07019430262 inválido.]']Pendente
0 Replies