Este fórum está sendo desativado

[Zema]

Boa tarde Galera,

Preciso da ajuda de vocês para a seguinte dúvida:
Tenho uma Agenda de Telefones em Excel VBA, o banco de dados é a própria planilha, e que os registros dos dados foram inseridos de forma que quando digito um nome para cadastrar na Agenda as primeiras letras dos nomes e sobrenomes automaticamente passam para maiúsculas as demais são minúsculas. Preciso de um código de pesquisa que eu possa digitar o nome a ser pesquisado tudo em minúsculas e ele busque os nomes cadastrados com iniciais em maiúsculas. Vou postar abaixo o código que estou usando no botão filtrar da minha Agenda. Essa Agenda que anexei abaixo está buscando legal o nome pesquisado só que tenho que digitar no txtbox da pesquisa a primeira letra maiúscula quero digitar tudo em letras minúsculas e ele buscar, pois já vi várias situações no youtube funcionando dessa forma em algumas vídeo aulas, mas pra mim nenhuma delas consegui aplicar no meu projeto.

Desde já

Obrigado

Zema

[ExcelFlex]

Me desculpe mas não li o seu código, pelo enunciado acho que você precisa do seguinte: Se você puder postar o arquivo fica mais fácil.

Código: Selecionar todos

if LCase(txtNome.Pesquisa) = LCase(Cell(numLin, numCol)) then
   'comparacao de maiúsculas com minúsculas executada 
End if

[Zema]

Aí Excel Flex, vai o arquivo

[Reinaldo]

Alterado apenas na pesquisa por -->nome<--, alteração apenas na montagem da clausura "Where"; veja se atende (se atender deve ser extendida para as demais pesquisas pretendida)

Agenda de Telefones1.xlsm

Cross post https://www.tomasvasquez.com.br/forum/v ... 603#p25603

[Zema]

Valeu Reinaldo, muito bom. Resolveu o problema e deu tudo certinho. Era o que eu precisava pro meu projeto. Obrigado

Abraço
Zema