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 Sim ou Não

    Compartilhe
    avatar
    neves1
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 100
    Registrado : 12/06/2017

    [Resolvido]Consulta Sim ou Não

    Mensagem  neves1 em 20/2/2018, 06:44

    Boa noite Srs, venho por meio desta solicitar ajudar de vcs.

    Tenho uma Tabela com as seguintes informações abaixo:

    Cliente - Texto
    Valor - Numero
    Pago - Sim/Não

    Gostaria de fazer uma consulta filtrando por pago e não pagos, consequentemente um relatório somente com os pagos e não pagos.

    Agradeço antecipadamente.


    Última edição por neves1 em 20/2/2018, 18:01, editado 1 vez(es)

    Noobezinho
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3632
    Registrado : 29/06/2012

    Re: [Resolvido]Consulta Sim ou Não

    Mensagem  Noobezinho em 20/2/2018, 10:42

    Paulo

    Acredito que irá chamar o relatório através de um formulário.

    Nesse formulário crie um grupo de opção com nome gpQuitado

    [Você precisa estar registrado e conectado para ver esta imagem.]



    Valor da opção: Sim = -1
                              Não = 0


    Então na grade da consulta base do relatório, coloque na linha critério da coluna Quitado:

    =Forms!NomeDoForm!gpQuitado.

    [ ]'s
    avatar
    neves1
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 100
    Registrado : 12/06/2017

    Re: [Resolvido]Consulta Sim ou Não

    Mensagem  neves1 em 20/2/2018, 11:47

    Bom dia, obrigado atenção,

    Ultima duvida sobre as opções sim = -1 e não = 0, como faço se fosse para imprimir ambos.

    Att.

    Noobezinho
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3632
    Registrado : 29/06/2012

    Re: [Resolvido]Consulta Sim ou Não

    Mensagem  Noobezinho em 20/2/2018, 16:13


    Paulo

    Estou fora de casa, quando retornar, respondo.

    Noobezinho
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3632
    Registrado : 29/06/2012

    Re: [Resolvido]Consulta Sim ou Não

    Mensagem  Noobezinho em 20/2/2018, 16:36

    Paulo

    Coloque uma caixa de texto vazia no seu formulário, pode deixar ela oculta.

    Dê-lhe o nome de txtFiltro

    Coloque a definição do Grupo de Opções, como Pago=1, Não Pago=2 e Todos=3

    No evento VBA depois da propriedade atualizar do seu Grupo de Opções, coloque:


    Private Sub gpFiltroAfter_Update()
    If Me.gpFiltro.Value = 1 Then Me.txtFiltro.Value = -1
    If Me.gpFiltro.Value = 2 Then Me.txtFiltro.Value = 0
    If Me.gpFiltro.Value = 3 Then Me.txtFiltro.Value = ""
    End Sub

    Agora no criterio do Campo Pago, na sua consulta que alimenta o relatório;

    Like "*" & [Forms]![SeuFormulario]![txtFiltro] & "*"

    [ ]'s


    avatar
    neves1
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 100
    Registrado : 12/06/2017

    Re: [Resolvido]Consulta Sim ou Não

    Mensagem  neves1 em 20/2/2018, 17:05

    Obrigado deu certissimo.

    Noobezinho
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3632
    Registrado : 29/06/2012

    Re: [Resolvido]Consulta Sim ou Não

    Mensagem  Noobezinho em 20/2/2018, 17:24

    Que ótimo!

    Só faltou o resolvido no título do tópico.

    Se não sabe como fazer, veja ali embaixo, na minha assinatura.

    [ ]'s

      Data/hora atual: 15/11/2018, 04:44