ATENÇÃO NOVOS USUÁRIOS

Se registrou recentemente? Seu cadastro será avaliado e mendiante aprovação, a conta será ativada e você poderá usufruir do fórum. O tempo de avaliação gira em torno de 24 a 48 horas.

Esqueceu sua senha?

Você pode usar o mecanismo de lembrete neste link: Recuperar senha

Você receberá um link de reativação no email cadastrado.

Não recebeu o email? Lembre-se checar o Lixo Eletrônico.

[RESOLVIDO] FILTRAR EXATAMENTE A STRING SELECIONADA

Fórum para dúvidas sobre os fundamentos da linguagem de programação Visual Basic no contexto do VBA
pedrobb
Colaborador
Colaborador
Mensagens: 62
Registrado em: Qua Jul 25, 2012 12:42 pm
Localização: Montes Claros-MG

[RESOLVIDO] FILTRAR EXATAMENTE A STRING SELECIONADA

Mensagem por pedrobb » Seg Fev 19, 2018 1:58 am

Pessoal,
Na ComboBox2.List = Array("ON", "PN", "PNA", "PNB", "PNC", "PND", "PNE", "PNF"), ao selecionar PN (por exemplo), são carregados também ítens do tipo PNA, PNB, etc. e, no caso, era para carregar somente ítens do tipo PN.
Existe algum código para filtrar exatamente (exclusivamente) a string selecionada?
Editado pela última vez por pedrobb em Seg Fev 19, 2018 6:59 pm, em um total de 1 vez.



Disable adblock

This site is supported by ads and donations.
If you see this text you are blocking our ads.
Please consider a Donation to support the site.


Avatar do usuário
webmaster
Administrador
Mensagens: 2789
Registrado em: Sex Jul 24, 2009 2:44 pm
Contato:

Re: FILTRAR EXATAMENTE A STRING SELECIONADA

Mensagem por webmaster » Seg Fev 19, 2018 4:54 pm

carregados onde? Quem esta filtrando?


Tomás
https://www.tomasvasquez.com.br/blog
https://www.tomasvasquez.com.br/cursocsharp
https://twitter.com/tomamais
Se sua dúvida foi solucionada, acrescente [RESOLVIDO] ao título.

pedrobb
Colaborador
Colaborador
Mensagens: 62
Registrado em: Qua Jul 25, 2012 12:42 pm
Localização: Montes Claros-MG

Re: FILTRAR EXATAMENTE A STRING SELECIONADA

Mensagem por pedrobb » Seg Fev 19, 2018 6:07 pm

Em uma ListView.
No modelo anexo, selecione PN e observe e vem registros com Tipo PNA, PNB, etc....
Grato,
Pedro
Anexos
Busca.zip
(199.29 KiB) Baixado 52 vezes



Avatar do usuário
Reinaldo
Jedi
Jedi
Mensagens: 1377
Registrado em: Sex Ago 01, 2014 4:09 pm
Localização: Garça - SP / SCS - SP

Re: FILTRAR EXATAMENTE A STRING SELECIONADA

Mensagem por Reinaldo » Seg Fev 19, 2018 6:24 pm

Sua rotina "BuscaPersonalizada", no controle ..>LookAt<.. consta como xlPart, assim e feita uma pesquisa caracter a caracter procurando uma combinação. Notivo de quando procura PN tambem recebe PNA....
Para sanar essa desconformidade, deve ser alterado esse trecho para ..>xlWhole<..

Código: Selecionar todos

With Planilha11
            If sSearchInCol = "" Then
                Set Busca = .Cells.Find(What:=TermoPesquisado, After:=.Range("A1"), LookIn:=xlFormulas, _
                    LookAt:=xlWhole, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
                    MatchCase:=False, SearchFormat:=False)
            Else
                Set Busca = .Range(sSearchInCol & ":" & sSearchInCol).Find( _
                    What:=TermoPesquisado, _
                    After:=.Range(sSearchInCol & "1"), _
                    LookIn:=xlFormulas, LookAt:=xlWhole, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
                    MatchCase:=False, SearchFormat:=False)
            End If
Obsevação.: Como trata-se de uma pesquisa valida para diversos campos,não sei como afetara as demais pesquisas


Reinaldo
:oops: :D :mrgreen: :geek:

Disable adblock

This site is supported by ads and donations.
If you see this text you are blocking our ads.
Please consider a Donation to support the site.


pedrobb
Colaborador
Colaborador
Mensagens: 62
Registrado em: Qua Jul 25, 2012 12:42 pm
Localização: Montes Claros-MG

Re: FILTRAR EXATAMENTE A STRING SELECIONADA

Mensagem por pedrobb » Seg Fev 19, 2018 6:56 pm

Novamente, muito obrigado, Reinaldo!
:D :D :D



Disable adblock

This site is supported by ads and donations.
If you see this text you are blocking our ads.
Please consider a Donation to support the site.


Responder