Pesquisa por parte do nome  [Resolvido]

Visual Basic for Aplication e macros no Excel.
Regras do fórum
Sua dúvida foi respondida? Marque como RESOLVIDO em seus tópicos, usando o botão com marca verde. Imagem

Pesquisa por parte do nome

Mensagempor MPrudencio » Ter Abr 23, 2019 11:53 am

Estou tentando fazer uma busca por nomes em um userform e estou usando a seguinte linha de comando para a pesquisa

If InStr(1, TXTPesquisa, TXTPesquisa.Value, vbTextCompare) Then

O que esta errado?

A intenção é digitar uma parte qualquer do nome por exemplo:

Mar

Deve retornar

Maria
Jose Maria
Marcio
Marcelo
Jose Marcelo
Marcia

Enfim !!

Alguem consegue ajudar?
Marcelo Prudencio
Microsoft Excel Brasil no Facebook

"Começar já é a metade do caminho."
Autor Desconhecido

Simplifica que simples fica.
Nicole Tomazella.

"O Simples é Sempre Melhor Que o Complicado"
Jorge Paulo Lemann.

MPrudencio
Membro
Membro
 
Mensagens: 2841
Registrado em: Sáb Ago 15, 2015 8:29 pm
Has thanked: 79 times
Have thanks: 625 times

{ SO_SELECT }

Re: Pesquisa por parte do nome  [Resolvido]

Mensagempor wagner » Ter Abr 23, 2019 1:44 pm

MPrudencio,

Boa tarde!

No exemplo abaixo, digite o que quer procurar na caixa de texto que o combobox será carregado apenas com os nomes que contém o que procura.

Veja se é assim.
Se a resposta foi útil para você, por gentileza, Amigo, clique na mãozinha ao lado direito da ferramenta CITAR, no canto superior direito.

Atenciosamente
Wagner Morel

For this post the author wagner thanked: 2
francap (Seg Ago 12, 2019 12:42 pm) • MPrudencio (Dom Abr 28, 2019 4:04 pm)
Avatar do usuário
wagner
Moderador
Moderador
 
Mensagens: 5551
Registrado em: Sáb Out 20, 2012 12:49 pm
Localização: Fortaleza - CE
Has thanked: 104 times
Have thanks: 2370 times

Re: Pesquisa por parte do nome

Mensagempor JSCOPA » Ter Abr 23, 2019 1:55 pm

.
Marcelo, você quer é validação por lista, com possibilidade de filtrar por parte do nome? ... Se for, dê uma olhada aqui viewtopic.php?f=21&t=30865 ?
.

JSCOPA
 

Re: Pesquisa por parte do nome

Mensagempor EdsonBR » Ter Abr 23, 2019 5:06 pm

Um pequeno descuido, amigo Marcelo

Vc repetiu o argumento fazendo String1 ser igual a String2. Então ao invés testar

If InStr(1, "Jose Maria", "Mar", vbTextCompare) Then

Vc está testando

If InStr(1, "Jose Maria", "Jose Maria", vbTextCompare)
Imagem

For this post the author EdsonBR thanked:
MPrudencio (Dom Abr 28, 2019 4:03 pm)
Avatar do usuário
EdsonBR
Membro
Membro
 
Mensagens: 631
Registrado em: Qui Nov 05, 2015 11:43 pm
Localização: Joinville, SC
Has thanked: 133 times
Have thanks: 407 times

Re: Pesquisa por parte do nome

Mensagempor francap » Seg Ago 12, 2019 12:44 pm

Você pode reenviar o arquivo. Estou com uma dúvida semelhante.


wagner escreveu:MPrudencio,

Boa tarde!

No exemplo abaixo, digite o que quer procurar na caixa de texto que o combobox será carregado apenas com os nomes que contém o que procura.

Veja se é assim.
francap
Membro
Membro
 
Mensagens: 3
Registrado em: Seg Ago 12, 2019 7:16 am
Has thanked: 1 time
Have thanks: 0 time

Re: Pesquisa por parte do nome

Mensagempor wagner » Qua Ago 14, 2019 4:13 pm

francap,

Boa tarde!

Infelizmente não tenho mais o arquivo. Desculpe.
Se a resposta foi útil para você, por gentileza, Amigo, clique na mãozinha ao lado direito da ferramenta CITAR, no canto superior direito.

Atenciosamente
Wagner Morel
Avatar do usuário
wagner
Moderador
Moderador
 
Mensagens: 5551
Registrado em: Sáb Out 20, 2012 12:49 pm
Localização: Fortaleza - CE
Has thanked: 104 times
Have thanks: 2370 times


Voltar para VBA & Macros

Quem está online

Usuários navegando neste fórum: Google Adsense [Bot], klarc28 e 10 visitantes