MaximoAccess

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

Obrigado

Administração do MaximoAccess

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

    [Resolvido]Pesquisa com Caixa de Combinação no SubForms

    Compartilhe

    Misson Lira
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 139
    Registrado : 01/12/2016

    [Resolvido]Pesquisa com Caixa de Combinação no SubForms

    Mensagem  Misson Lira em Seg 06 Fev 2017, 11:35

    Bom dia !

    Pessoal? To com uma tela de Cadastro de Cliente, desse cadastro eu tenho uma lista de todos os clientes.
    Nessa lista eu quero coloca 3 caixa de combinação com respectivos dados em cada caixa, os nomes do cliente, CPF,RG para o usuario ter uma escolha de como vai querer pesquisa os dados do cliente, sendo que minha lista de Clientes ele é feita em um Formulário dividido, onde minha fonte de registro é minha tabela de cadastro de Cliente.

    Teve um exemplo que um amigo me deu aqui, so que foi com uma caixa de listagem ja tentei coloca o código da mesma forma mais não deu certo.

    Quem puder me Ajuda Agradeço.
    avatar
    FabioPaes
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3488
    Registrado : 14/08/2013

    Re: [Resolvido]Pesquisa com Caixa de Combinação no SubForms

    Mensagem  FabioPaes em Seg 06 Fev 2017, 19:21

    Seriam três caixas de Texto (uma para Nome, outra para o CPF e outra para o RG), onde ao digital um valor, atualizaria a caixa de de Listagem, exibindo apenas os dados referente ao Valor Pesquisado? Seria isso amigo?


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

    Misson Lira
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 139
    Registrado : 01/12/2016

    Re: [Resolvido]Pesquisa com Caixa de Combinação no SubForms

    Mensagem  Misson Lira em Seg 06 Fev 2017, 19:25

    Boa Tarde!

    Sim! Seria isso sim, Mais seria um Formulário no formato: Formulário dividido
    não teria caixa de listagem.

    Sera que tem como ?

    Misson Lira
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 139
    Registrado : 01/12/2016

    Re: [Resolvido]Pesquisa com Caixa de Combinação no SubForms

    Mensagem  Misson Lira em Seg 06 Fev 2017, 19:41

    Eu falei no exemplo de cadastro de cliente, mais vou manda um exemplo de cadastro de produto.
    TBL_CDS_produto

    FRM_CDS_Produto

    FRM_LST_Produto

    Nesse FRM_LST_Produto que estou querendo coloca a caixa para pesquisa.
    Se tiver como da uma olha, agradeço.
    Anexos
    Teste Lista Produto.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (267 Kb) Baixado 11 vez(es)
    avatar
    FabioPaes
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3488
    Registrado : 14/08/2013

    Re: [Resolvido]Pesquisa com Caixa de Combinação no SubForms

    Mensagem  FabioPaes em Seg 06 Fev 2017, 19:54

    Se é formulário, então de uma olhada nesse exemplo aqui:
    [Você precisa estar registrado e conectado para ver este link.]
    Bem simples! e vc entenderá como deve ser feito!

    Obs: Apesar do exemplo esta Formulário Continuo, acredito que irá funcionar normalmente para Dividido!


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

    Misson Lira
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 139
    Registrado : 01/12/2016

    Re: [Resolvido]Pesquisa com Caixa de Combinação no SubForms

    Mensagem  Misson Lira em Seg 06 Fev 2017, 20:22

    Olhei agora o exemplo...
    no caso precisa coloca só aquele código?
    e só precisa coloca na caixa de pesquisa?

    Sou muito novo nesse lado do access.
    avatar
    FabioPaes
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3488
    Registrado : 14/08/2013

    Re: [Resolvido]Pesquisa com Caixa de Combinação no SubForms

    Mensagem  FabioPaes em Seg 06 Fev 2017, 20:27

    Sim, somente em cada caixa de Texto...

    Acredito que baixou e testou o exemplo certo?

    No exemplo indicado acompanhe os comentários:

    O método utilizado foi a propriedade do formulário "Filtro"


    'Declara a Variavel
    Dim strFiltro As String
    'Controi e passa para a Variavel o Filtro
    strFiltro = "nomeCliente LIKE '*" & Me.txtPesquisa.Text & "*' "
    'Aplica o Filtro no Formulario de nome FormVendas
    Me.FormVendas.Form.Filter = strFiltro
    Me.FormVendas.Form.FilterOn = True


    ou seja, a medida que vc digita na caixa de texto, como o código está no evento ao Ao alterar, ele vai aplicando um filtro no Campo nomeCliente com o valor digitado na caixa de texto de nome Me.txtPesquisa


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

    Misson Lira
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 139
    Registrado : 01/12/2016

    Re: [Resolvido]Pesquisa com Caixa de Combinação no SubForms

    Mensagem  Misson Lira em Seg 06 Fev 2017, 20:47

    Olha meu nobre!


    'Declara a Variavel
    Dim strFiltro As String
    'Controi e passa para a Variavel o Filtro
    strFiltro = "Descrição LIKE '*" & Me.txtpesquisa.Text & "*' "
    'Aplica o Filtro no Formulario
    Me.FRM_LST_Produto.Form.Filter = strFiltro
    Me.FRM_LST_Produto.Form.FilterOn = True

    Ta dando um erro!

    Erro de compilação:
    Método ou membro de dados não encontrados

    E essa linha fica em amarelo

    Me.FRM_LST_Produto.Form.Filter = strFiltro






    avatar
    FabioPaes
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3488
    Registrado : 14/08/2013

    Re: [Resolvido]Pesquisa com Caixa de Combinação no SubForms

    Mensagem  FabioPaes em Seg 06 Fev 2017, 21:08

    Posta aqui esse exemplo ja com o código... e me diga o nome do Formulário!


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

    Misson Lira
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 139
    Registrado : 01/12/2016

    Re: [Resolvido]Pesquisa com Caixa de Combinação no SubForms

    Mensagem  Misson Lira em Seg 06 Fev 2017, 21:17

    nome do formulário que vou fazer a pesquisa é FRM_LST_Produto
    Anexos
    Teste Lista Produto.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (265 Kb) Baixado 2 vez(es)
    avatar
    FabioPaes
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3488
    Registrado : 14/08/2013

    Re: [Resolvido]Pesquisa com Caixa de Combinação no SubForms

    Mensagem  FabioPaes em Seg 06 Fev 2017, 22:00

    Amigo, se atentar para a nomenclatura dos campos, evitando acentos e caracteres especiais (-,[]'""/*-+....)


    Descrição tem ç portanto deve ficar entre[] assim: [Descrição]

    Veja que foi criado um Novo Formulário (Formulário Principal de nome "frmPesquisa") para dentro dele colocar um subformulário com os dados que queremos. Porque isso?

    Simples, se aplicarmos o filtro direto no formulário principal utilizando evento ao Alterar, o access da um problema com espaço, so permitindo digitar Uma única letra, tendo a necessidade de simular o F2.... portanto acho mais simples colocar em subformulário. Faça um teste no seu exemplo apenas corrigindo o código e verá o problema...

    Outra coisa, é que se vou aplica o filtro no próprio formulário que está a caixa de Texto, não preciso informar o nome do Formulário:
    Me.FRM_LST_Produto.Form.FilterOn

    Bastando apenas informar a propriedade: Me.FilterOn

    Baixe o exemplo aqui: dropbox.com/s/457bbc9x2joy0yf/Teste%20Lista%20Produto.zip?dl=0


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

    Misson Lira
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 139
    Registrado : 01/12/2016

    Re: [Resolvido]Pesquisa com Caixa de Combinação no SubForms

    Mensagem  Misson Lira em Ter 07 Fev 2017, 20:36

    Boa tarde!
    Colega? conseguir fazer  a pesquisa..
    Mais fiz um pouco diferente do seu, assim, usei seus comandos que me passou, e de um outro grande mestre, Gilberlânio.

    No Caso não fiz o subforms e resolvi o problema de só puder digitar só uma letra,e também  do espaço e, tem esse vídeo que estou mandando o link que mostra como fazer para fica automático o campo de pesquisa.Para não fica utilizando o F2

    Como da espaço e não ter que fica apertando o F2, fica automático
    [Você precisa estar registrado e conectado para ver este link.]

    vou te manda o arquivo pra tu ver como ficou.


    E claro muito obrigado pela ajuda. me ajudou muito...

    Abraço!
    Anexos
    Teste Lista Produto.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (261 Kb) Baixado 6 vez(es)
    avatar
    FabioPaes
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3488
    Registrado : 14/08/2013

    Re: [Resolvido]Pesquisa com Caixa de Combinação no SubForms

    Mensagem  FabioPaes em Ter 07 Fev 2017, 20:58

    Que bom que deu certo amigo...

    Como lhe falei, eu prefiro fazer dentro de outro formulário e evitar ter que esta Simulando teclas, pois acho que fica bem melhor inclusive visualmente, alem de não ter que ficar executando um código a mais a cada letra digitada... Mas claro esse é apenas o meu pensamento!


    Por favor, se a duvida foi solucionada, por favor marque o tópico como resolvido:

    [Você precisa estar registrado e conectado para ver este link.]


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

    Misson Lira
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 139
    Registrado : 01/12/2016

    Re: [Resolvido]Pesquisa com Caixa de Combinação no SubForms

    Mensagem  Misson Lira em Qua 08 Fev 2017, 15:02

    Sim resolveu!

    muito obrigado!

      Data/hora atual: Qui 14 Dez 2017, 08:06