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

    avatar
    Driver11
    Novato
    Novato

    Respeito às Regras 100%

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

    [Resolvido]Consulta com caixa de combinação Empty [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!
    avatar
    thiagonsilvaa
    Avançado
    Avançado

    Respeito às Regras 100%

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

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

    avatar
    Driver11
    Novato
    Novato

    Respeito às Regras 100%

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

    [Resolvido]Consulta com caixa de combinação Empty 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.
    toyebom
    toyebom
    VIP
    VIP

    Respeito às Regras 100%

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

    [Resolvido]Consulta com caixa de combinação Empty 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.
    avatar
    Driver11
    Novato
    Novato

    Respeito às Regras 100%

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

    [Resolvido]Consulta com caixa de combinação Empty 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.
    avatar
    thiagonsilvaa
    Avançado
    Avançado

    Respeito às Regras 100%

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

    [Resolvido]Consulta com caixa de combinação Empty 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.
    avatar
    Driver11
    Novato
    Novato

    Respeito às Regras 100%

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

    [Resolvido]Consulta com caixa de combinação Empty 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.
    avatar
    thiagonsilvaa
    Avançado
    Avançado

    Respeito às Regras 100%

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

    [Resolvido]Consulta com caixa de combinação Empty 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.
    toyebom
    toyebom
    VIP
    VIP

    Respeito às Regras 100%

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

    [Resolvido]Consulta com caixa de combinação Empty 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
    [Resolvido]Consulta com caixa de combinação AttachmentNovo Microsoft Access Database.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (26 Kb) Baixado 29 vez(es)


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

    Respeito às Regras 100%

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

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

    https://www.maximoaccess.com/t9104-manual-de-bases-de-dados-e-access-xp_portugues?highlight=manual


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

    Respeito às Regras 100%

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

    [Resolvido]Consulta com caixa de combinação Empty 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!
    avatar
    thiagonsilvaa
    Avançado
    Avançado

    Respeito às Regras 100%

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

    [Resolvido]Consulta com caixa de combinação Empty Consulta com caixa de combinação

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

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

    Respeito às Regras 100%

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

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


    avatar
    thiagonsilvaa
    Avançado
    Avançado

    Respeito às Regras 100%

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

    [Resolvido]Consulta com caixa de combinação Empty [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: 19/10/2020, 22:52