FabioPaes- Maximo VIP
- Respeito às regras :
Sexo :
Localização :
Mensagens : 3914
Registrado : 14/08/2013
FabioPaes 25/12/2016, 20:28
Dim k&
For k = 0 To Me!NomeCxListagemParaPesquisar.ListCount - 1
If Me!NomeCxListagemParaPesquisar.ItemData(k) = Me!NomeCaixaTextoaPesquisar Then
Me!NomeCxListagemParaPesquisar.Selected(k) = True
Exit For
End If
Next
Amigão,
NomeCxListagemParaPesquisar aqui é o Nome de sua Caixa de Listagem que mostram os arquivos PDF e Imagem.
NomeCaixaTextoaPesquisar Aqui é a Caixa de texto onde vc digita o Texto que deve ser localizado.
.................................................................................
_____________________________________________________________________
Achou a solução para sua dúvida? Não seja Egoísta, Compartilhe com todos!
A dica do Colega foi útil? Agradeça!
O importante não saber tudo, mas sim a Onde procurar!