MaximoAccess

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

Obrigado

Administração do MaximoAccess


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.

Obrigado

Administração do MaximoAccess

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

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

    avatar
    Misson Lira
    Avançado
    Avançado

    Respeito às Regras 100%

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

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

    Mensagem  Misson Lira Seg 6 Fev - 9: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.
    FabioPaes
    FabioPaes
    Maximo VIP
    Maximo VIP

    Respeito às Regras 100%

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

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

    Mensagem  FabioPaes Seg 6 Fev - 17: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!
    avatar
    Misson Lira
    Avançado
    Avançado

    Respeito às Regras 100%

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

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

    Mensagem  Misson Lira Seg 6 Fev - 17: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 ?
    avatar
    Misson Lira
    Avançado
    Avançado

    Respeito às Regras 100%

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

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

    Mensagem  Misson Lira Seg 6 Fev - 17: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
    [Resolvido]Pesquisa com Caixa de Combinação no SubForms AttachmentTeste Lista Produto.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (267 Kb) Baixado 12 vez(es)
    FabioPaes
    FabioPaes
    Maximo VIP
    Maximo VIP

    Respeito às Regras 100%

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

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

    Mensagem  FabioPaes Seg 6 Fev - 17:54

    Se é formulário, então de uma olhada nesse exemplo aqui:
    https://www.maximoaccess.com/t26778-resolvidofiltrar-exemplo
    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!
    avatar
    Misson Lira
    Avançado
    Avançado

    Respeito às Regras 100%

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

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

    Mensagem  Misson Lira Seg 6 Fev - 18: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.
    FabioPaes
    FabioPaes
    Maximo VIP
    Maximo VIP

    Respeito às Regras 100%

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

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

    Mensagem  FabioPaes Seg 6 Fev - 18: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!
    avatar
    Misson Lira
    Avançado
    Avançado

    Respeito às Regras 100%

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

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

    Mensagem  Misson Lira Seg 6 Fev - 18: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






    FabioPaes
    FabioPaes
    Maximo VIP
    Maximo VIP

    Respeito às Regras 100%

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

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

    Mensagem  FabioPaes Seg 6 Fev - 19: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!
    avatar
    Misson Lira
    Avançado
    Avançado

    Respeito às Regras 100%

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

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

    Mensagem  Misson Lira Seg 6 Fev - 19:17

    nome do formulário que vou fazer a pesquisa é FRM_LST_Produto
    Anexos
    [Resolvido]Pesquisa com Caixa de Combinação no SubForms AttachmentTeste Lista Produto.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (265 Kb) Baixado 2 vez(es)
    FabioPaes
    FabioPaes
    Maximo VIP
    Maximo VIP

    Respeito às Regras 100%

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

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

    Mensagem  FabioPaes Seg 6 Fev - 20: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!
    avatar
    Misson Lira
    Avançado
    Avançado

    Respeito às Regras 100%

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

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

    Mensagem  Misson Lira Ter 7 Fev - 18: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
    https://www.youtube.com/watch?v=4KFxUCSHSPI

    vou te manda o arquivo pra tu ver como ficou.


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

    Abraço!
    Anexos
    [Resolvido]Pesquisa com Caixa de Combinação no SubForms AttachmentTeste Lista Produto.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (261 Kb) Baixado 6 vez(es)
    FabioPaes
    FabioPaes
    Maximo VIP
    Maximo VIP

    Respeito às Regras 100%

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

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

    Mensagem  FabioPaes Ter 7 Fev - 18: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:

    Veja como Fazer


    .................................................................................
    _____________________________________________________________________
    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!
    avatar
    Misson Lira
    Avançado
    Avançado

    Respeito às Regras 100%

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

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

    Mensagem  Misson Lira Qua 8 Fev - 13:02

    Sim resolveu!

    muito obrigado!

      Data/hora atual: Sab 27 Fev - 15:43