Fernando, Está dando um erro na linha 26, "ActiveSheet.Protect ("gplan211127"), AllowFiltering:=True" Parecia funcionar, mas ag...

Fernando, Perfeito!Parabéns e muito obrigado.

Oi Fernando, Entendi a alteração, mas não identifiquei onde no código devo inserir a linha...

Olá, vi seu post e me recordou 2 códigos que consegui na Net. Eles se completam e fazem algo parecido ao que você colocou. Este faz uma busca e retor...

Então eu deveria procurar pelo código do caracter * ?. Como ficaria ?

Obrigado a todos.Ficou muito boa a solução. Valeu mesmo.

REALMENTE, não será por falta de opções. Considerei todas as respostas e segui os passos do MAURO COUTINHO que me pareceU mais adequada. Eu gostaria d...

Laennder, Sabia que já tinha visto algo parecido. Infelizmente só poderei testar amanhã, mas acredito que seja a solução. Desde já agradeço. Obriga...

Obrigado! Fiz uma pesquisa, adaptei e cheguei ao mesmo resultado. Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address =...