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]Consulta com caixa de combinação

    Compartilhe

    Driver11
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 16
    Registrado : 13/02/2017

    [Resolvido]Consulta com caixa de combinação

    Mensagem  Driver11 em 1/8/2017, 01:43

    Boa noite, senhores.
    Mais uma vez venho pedir uma gentileza sobre algo que gostaria de fazer, mas não estou sabendo como. Já fiz algumas pesquisas aqui e em outros sites, mas não consegui entender e tampouco adaptar à minha necessidade. Gostaria de saber como fazer uma consulta no Access usando uma caixa de combinação ao invés de ter de digitar o que busco.
    Existe esta possibilidade?

    Muito agradecido pela atenção de todos.
    Forte abraço!

    thiagonsilvaa
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 173
    Registrado : 12/01/2017

    Consulta com caixa de combinação

    Mensagem  thiagonsilvaa em 1/8/2017, 02:46

    Boa noite.
    Pelo que entendi, você quer filtrar os resultados da consulta através de uma combox, correto ?
    Se for isso, você vai criar o formulário e inserir nele uma combox com o nome que desejar. Ex: "cmbfiltro".
    No critério da consulta, no campo que você deseja filtrar você vai inserir: Como [Formulários]![nomedseuform]![cmbfiltro]
    Crie um botão no formulário e chame a consulta.
    DoCmd.OpenQuery "nome da sua consulta" ... etc.


    Driver11
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 16
    Registrado : 13/02/2017

    Re: [Resolvido]Consulta com caixa de combinação

    Mensagem  Driver11 em 3/8/2017, 00:32

    Boa noite, Amigo.
    Fico agradecido pela sua atenção.
    Vou tentar aqui o que você mencionou e lhe dou um retorno.
    Obrigado.

    Abraço.
    avatar
    toyebom
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 1060
    Registrado : 18/07/2012

    Re: [Resolvido]Consulta com caixa de combinação

    Mensagem  toyebom em 3/8/2017, 01:15

    Adapta

    No evento depois de atualizar:

    Private Sub Texto56_AfterUpdate()
    If Texto56 = "" Then
    Me.Filter = "" ' Limpa o filtro do formulário
    Texto56 = ""
    Else
    DoCmd.ApplyFilter , "[Serviços.Cliente] = '" & Texto56 & "'"
    End If
    Me.Comando58.SetFocus
    End Sub

    Para limpara consulta crias um botão e

    Private Sub Comando58_Click()
    Me.Texto56 = ""
    Me.Filter = "" ' Limpa o filtro do formulário
    DoCmd.ShowAllRecords
    End Sub


    .................................................................................
    Gente Simples, fazendo coisas pequenas, em lugares pouco importantes, consegue mudanças extraordinárias.

    Driver11
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 16
    Registrado : 13/02/2017

    Re: [Resolvido]Consulta com caixa de combinação

    Mensagem  Driver11 em 3/8/2017, 01:42

    Olá Mestres.
    Fiz umas três tentativas aqui, mas sinceramente não entendi o que é para ser feito.
    Quando você diz: "você vai criar o formulário e inserir nele uma combox com o nome que desejar", o que eu tenho que fazer é na verdade um novo formulário só para este comando ou esta combo seria no formulário de dados?

    E aqui: "Crie um botão no formulário e chame a consulta.
    DoCmd.OpenQuery "nome da sua consulta" ... etc." , seria um outro botão diferente da combobox no mesmo formulário?

    toyebom, fico muito agradecido pela sua dica também...Gostaria de poder desenvolver todos esses comandos que vocês me passaram.

    Desculpem a limitação do meu conhecimento.

    Um forte abraço a vocês.

    thiagonsilvaa
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 173
    Registrado : 12/01/2017

    Re: [Resolvido]Consulta com caixa de combinação

    Mensagem  thiagonsilvaa em 3/8/2017, 01:47

    Isso, exatamente ! Você vai criar a consulta como desejar. Você vai entrar no modo design dela e inserir " como [forms]![nomedoseuform]![nomedasuacombox] no campo que você deseja filtrar através de um formulário, crie um formulário para isso ou use em algum que voce já tenha, vai da sua necessidade.

    Driver11
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 16
    Registrado : 13/02/2017

    Re: [Resolvido]Consulta com caixa de combinação

    Mensagem  Driver11 em 3/8/2017, 02:06

    Desculpe, Mestre.
    Não estou entendo o conceito disso.
    Não estou sabendo fazer isso.

    thiagonsilvaa
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 173
    Registrado : 12/01/2017

    Consulta com caixa de combinação

    Mensagem  thiagonsilvaa em 3/8/2017, 02:50

    Bom, vamos passo a passo !
    Primeiro crie a consulta e um formulário
    Segundo insira um botão no form e uma combox, lembre-se de dar nome aos seus controles.
    Terceiro entre no modo design da consulta e no critério do campo que deseja filtrar insira: Como [Formulários]![nomedoseuform]![nomedacombox]
    Quarto na ação ao clicar do botão insira o seguinte código: DoCmd.Openquery "nome da sua consulta"

    Siga esses passos, qualquer coisa só contatar novamente.
    avatar
    toyebom
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 1060
    Registrado : 18/07/2012

    Consulta com caixa de combinação

    Mensagem  toyebom em 3/8/2017, 03:04

    Fazes tudo no mesmo formulário a combo para o campo que queres filtrar e o botão para limpar o filtro.

    Mais facil, anexa o teu bd para vermos o que queres.

    Entretanto vê se é isto.
    Anexos
    Novo Microsoft Access Database.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (26 Kb) Baixado 23 vez(es)


    .................................................................................
    Gente Simples, fazendo coisas pequenas, em lugares pouco importantes, consegue mudanças extraordinárias.
    avatar
    toyebom
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 1060
    Registrado : 18/07/2012

    Consulta com caixa de combinação

    Mensagem  toyebom em 3/8/2017, 03:14

    Se és iniciante em access aconselho-te a leres um pouco sobre o assunto e a estudar os exemplos que colocamos no forum

    Tens aqui um bom livro sobre access

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


    .................................................................................
    Gente Simples, fazendo coisas pequenas, em lugares pouco importantes, consegue mudanças extraordinárias.

    Driver11
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 16
    Registrado : 13/02/2017

    Re: [Resolvido]Consulta com caixa de combinação

    Mensagem  Driver11 em 8/8/2017, 00:21

    Boa noite Thiago e Toyebom.
    Fico imensamente agradecido pelas respostas e os esclarecimentos. Agora vou tentar fazer o que vocês me passaram.
    Retorno em breve.
    Muito obrigado mesmo.
    Abraço a vocês!

    thiagonsilvaa
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 173
    Registrado : 12/01/2017

    Consulta com caixa de combinação

    Mensagem  thiagonsilvaa em 10/8/2017, 04:12

    Estamos no aguardo de alguma posição !
    Abraços.

    Driver11
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 16
    Registrado : 13/02/2017

    Re: [Resolvido]Consulta com caixa de combinação

    Mensagem  Driver11 em 16/8/2017, 22:03

    Boa noite Thiago e Toyebom.
    Primeiramente, escusas pela demora do retorno. Estive com outros afazeres não sendo a informática.
    Consegui adaptar vossas instruções à minha necessidade. Fico muito agradecido pela atenção e ajuda.
    Em tempo, sei que preciso estudar tudo isso ai.

    Um forte abraço e mais uma vez, muito obrigado.



    thiagonsilvaa
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 173
    Registrado : 12/01/2017

    [Resolvido]Consulta com caixa de combinação

    Mensagem  thiagonsilvaa em 18/8/2017, 13:59

    Que bom que deu certo !!!
    Qualquer dúvida estamos a disposição.
    O fórum agradece o retorno.
    Abraços.

      Data/hora atual: 17/11/2018, 03:19