MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access


3 participantes

    [Resolvido]Pesquisa em Lista

    campos2013
    campos2013
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 275
    Registrado : 03/10/2013

    [Resolvido]Pesquisa em Lista Empty [Resolvido]Pesquisa em Lista

    Mensagem  campos2013 10/6/2014, 20:07

    Boa tarde amigos desse fórum,
     
    com a necessidade de uma pesquisa mais refinada em torno de muitos itens, andei fazendo alguns testes de acordo com os exemplos aqui postados, mas os exemplos que encontrei achei complicado em adaptar em meu banco de dados pois meus conhecimentos não são tão abrangentes e acabei me perdendo e não consegui concluir.
     
    Montei um exemplo básico e porventura se alguém puder me ajudar a completar o exemplo, ficarei muito grato.
     
    No exemplo, gostaria que ao digitar o produto desejado, os outros produtos desaparecessem e só ficasse os produtos com a digitação da pesquisa.

    Segue anexo o BD exemplo para adaptação.
     
    Grato,
     
     
    Campos.


    .................................................................................
    "Reconhecer todas as coisas, mesmo de longe."
    avatar
    Kaynan
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2980
    Registrado : 09/04/2012

    [Resolvido]Pesquisa em Lista Empty Re: [Resolvido]Pesquisa em Lista

    Mensagem  Kaynan 10/6/2014, 20:29


    Assim amigo.


    https://dl.dropboxusercontent.com/u/90217826/Pesquisa.rar
    campos2013
    campos2013
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 275
    Registrado : 03/10/2013

    [Resolvido]Pesquisa em Lista Empty Re: [Resolvido]Pesquisa em Lista

    Mensagem  campos2013 11/6/2014, 01:09

    Kaynan, boa noite amigo,


    Nossa! cheers 

    Do que eu já pesquisei não imaginava que era simples assim, ou seja, a coisa só fica simples a partir do momento em que se adquiri o conhecimento.study 

    Olha, gostei muito, resolveu a minha dúvida. 

    Um forte abraço,

    Grato,

    Campos.


    .................................................................................
    "Reconhecer todas as coisas, mesmo de longe."
    avatar
    Kaynan
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2980
    Registrado : 09/04/2012

    [Resolvido]Pesquisa em Lista Empty Re: [Resolvido]Pesquisa em Lista

    Mensagem  Kaynan 11/6/2014, 02:18

    Que bom amigo que deu certo.
    Agora coloque o resolvido que ta no final junto com o enviar.
    sucesso..
    campos2013
    campos2013
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 275
    Registrado : 03/10/2013

    [Resolvido]Pesquisa em Lista Empty Re: [Resolvido]Pesquisa em Lista

    Mensagem  campos2013 11/6/2014, 13:59

    Kaynan, bom dia!

    Se não for abusar, á claro,


    Você poderia fazer o mesmo recurso em código VB, pois todo meu bd é feito em código para evitar alguns problemas de alteração e exclusão de informações, pois várias pessoas tem acesso nesse BD, e antigamente tive vários problemas, até passar tudo para código interno(VB).

    Mas, não é todo recurso que consigo montar, como nesse caso que você está me ajudando.

    Grato,

    Campos.


    .................................................................................
    "Reconhecer todas as coisas, mesmo de longe."
    Assis
    Assis
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4772
    Registrado : 06/11/2009

    [Resolvido]Pesquisa em Lista Empty Re: [Resolvido]Pesquisa em Lista

    Mensagem  Assis 11/6/2014, 14:24

    Boa tarde

    Como ainda não está resolvido vou colocar aqui o meu exemplo

    Campos e Haynan ....

    Façam o teste e procurem por " CRISTAL " , também aparece "Açucar" ou procurar por outra palavra que esteja no campo.


    .................................................................................
    *** Só sei que nada sei ***
    campos2013
    campos2013
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 275
    Registrado : 03/10/2013

    [Resolvido]Pesquisa em Lista Empty Re: [Resolvido]Pesquisa em Lista

    Mensagem  campos2013 11/6/2014, 20:57

    Boa tarde Assis,


    Realmente nos testes, pega qualquer palavra, gostei.

    Muito bom!


    Só tem um detalhe:

    Buscando pela palavra Açucar ele não reconhece o " Ç ", ficando "aucar".

    Como ajustaria esse detalhe?

    Simplificaria digitando todos os itens sem cê cedilha?

    Ou tem outra forma?


    Grato!


    Campos.


    .................................................................................
    "Reconhecer todas as coisas, mesmo de longe."
    Assis
    Assis
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4772
    Registrado : 06/11/2009

    [Resolvido]Pesquisa em Lista Empty Re: [Resolvido]Pesquisa em Lista

    Mensagem  Assis 11/6/2014, 21:27

    Campos
    vou testar e retorno


    .................................................................................
    *** Só sei que nada sei ***
    Assis
    Assis
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4772
    Registrado : 06/11/2009

    [Resolvido]Pesquisa em Lista Empty Re: [Resolvido]Pesquisa em Lista

    Mensagem  Assis 11/6/2014, 22:17

    Campos

    Tem se ser do teclado. Aqui não tenho esse problema veja na imagem anexa.


    .................................................................................
    *** Só sei que nada sei ***
    avatar
    Convidado
    Convidado


    [Resolvido]Pesquisa em Lista Empty Re: [Resolvido]Pesquisa em Lista

    Mensagem  Convidado 11/6/2014, 23:10

    Assis no teu exemplo tem um bloqueio de várias teclas, dentre elas o ç (186).

    Private Sub txtFiltro_KeyDown(KeyCode As Integer, Shift As Integer)
    If KeyCode >= 186 And KeyCode <= 191 And KeyCode <= 193 And KeyCode <= 220 Then
    KeyCode = 0
    Else
    Exit Sub
    End If
    End Sub
    Assis
    Assis
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4772
    Registrado : 06/11/2009

    [Resolvido]Pesquisa em Lista Empty Re: [Resolvido]Pesquisa em Lista

    Mensagem  Assis 11/6/2014, 23:22

    Boa noite Beto

    Mas como pode ver na imagem da Msg nº 9 o Ç funciona.

    Obrigado


    .................................................................................
    *** Só sei que nada sei ***
    avatar
    Convidado
    Convidado


    [Resolvido]Pesquisa em Lista Empty Re: [Resolvido]Pesquisa em Lista

    Mensagem  Convidado 11/6/2014, 23:25

    fiz o teste tirei o comando e funciona normal, se retorno não funciona as teclas (ç , . ; e outras mais),.
    Assis
    Assis
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4772
    Registrado : 06/11/2009

    [Resolvido]Pesquisa em Lista Empty Re: [Resolvido]Pesquisa em Lista

    Mensagem  Assis 11/6/2014, 23:35

    Beto
    Qual o seu sistema

    Office ?
    e Windows ?


    O meu é Office 2007 Service pack 3
    Windows 8.1


    .................................................................................
    *** Só sei que nada sei ***
    avatar
    Convidado
    Convidado


    [Resolvido]Pesquisa em Lista Empty Re: [Resolvido]Pesquisa em Lista

    Mensagem  Convidado 12/6/2014, 00:41

    Assis, testei no windows xp com access 2003 e 2007, windows 7 64 bits com 2007, 2010 e 2013, mas veja só, o código 186 representa os Ç ç, e quando vc diz:
    If KeyCode >= 186 Then
    KeyCode = 0

    Vc está bloqueando as tecla que tem o código maior ou igual 186, independente do OS e Access que esteja na sua máquina, estranho a tecla ç do seu teclado estar funcionando
    avatar
    Kaynan
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2980
    Registrado : 09/04/2012

    [Resolvido]Pesquisa em Lista Empty Re: [Resolvido]Pesquisa em Lista

    Mensagem  Kaynan 12/6/2014, 01:08

    Realmente beto sem o KeyCode=0 funciona legal.
    campos2013
    campos2013
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 275
    Registrado : 03/10/2013

    [Resolvido]Pesquisa em Lista Empty Re: [Resolvido]Pesquisa em Lista

    Mensagem  campos2013 12/6/2014, 17:45

    Boa tarde Pessoal!

    Nos casos aqui mencionados, temos duas situações de debate, porém muito proveitosas, pois acredito que em se tratando de versões diferentes tudo pode acontecer.

    O interessante é que teremos duas formas de utilizar o código e se uma não roda, a outra, rodará.

    Eu utilizei o Exemplo do Assis com o ajuste do Beto Givoni e foi resolvido, utilizo o access 2010.

    Amigos: (Kaynan, Assis e Beto)

    Um forte abraço para vocês e obrigado pela disponibilidade e atenção.


    Campos.


    .................................................................................
    "Reconhecer todas as coisas, mesmo de longe."
    Assis
    Assis
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4772
    Registrado : 06/11/2009

    [Resolvido]Pesquisa em Lista Empty Re: [Resolvido]Pesquisa em Lista

    Mensagem  Assis 12/6/2014, 18:57

    Obrigado Campos
    Falta colocar o


    Resolvido




    .................................................................................
    *** Só sei que nada sei ***
    campos2013
    campos2013
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 275
    Registrado : 03/10/2013

    [Resolvido]Pesquisa em Lista Empty Re: [Resolvido]Pesquisa em Lista

    Mensagem  campos2013 13/6/2014, 00:22

    Assis, eu que tenho a agradecer.

    Grato,

    Campos.


    .................................................................................
    "Reconhecer todas as coisas, mesmo de longe."

    Conteúdo patrocinado


    [Resolvido]Pesquisa em Lista Empty Re: [Resolvido]Pesquisa em Lista

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 23/11/2024, 03:45