Página 1 de 1

FILTRAR EXATAMENTE A STRING SELECIONADA

Enviado: 19 Fev 2018 às 13:21
por PedroBB
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?


Obs: Também postei no link:
http://www.tomasvasquez.com.br/forum/vi ... =20&t=6082

Re: FILTRAR EXATAMENTE A STRING SELECIONADA

Enviado: 19 Fev 2018 às 14:08
por babdallas
Anexa a planilha para podermos lhe ajudar.

Re: FILTRAR EXATAMENTE A STRING SELECIONADA

Enviado: 19 Fev 2018 às 18:09
por PedroBB
No modelo anexo, selecione PN e observe e vem registros como Tipo PNA, PNB, etc....
Grato,
Pedro

FILTRAR EXATAMENTE A STRING SELECIONADA

Enviado: 19 Fev 2018 às 19:01
por PedroBB
Solução do Professor Reinaldo (http://www.tomasvasquez.com.br/forum/vi ... =20&t=6082)

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<..


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