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]Caixa de Seleção desmarcar ao clicar

    Connekta Informatica
    Connekta Informatica
    VIP
    VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1040
    Registrado : 01/07/2011

    [Resolvido]Caixa de Seleção desmarcar ao clicar Empty [Resolvido]Caixa de Seleção desmarcar ao clicar

    Mensagem  Connekta Informatica em 17/10/2018, 18:29

    Boa Tarde

    Tenho um formulário de Relatório de Despesas, onde tenho duas caixas de seleção ( 1. Por Fornecedor, 2. Por Conta Bancária/Caixa).

    Como eu faço, quando eu marcar qualquer uma caixas ao clicar desmarque.

    Por exemplo eu selecionei a Opção 1 (Por Fornecedor), ai eu não quero mais que o relatório filtre pelo fornecedor e nem pela opção 2 (Por Conta Bancária/Caixa), quero o relatório geral.

    Veja a tela do Relatório, marcado em vermelho:

    [Resolvido]Caixa de Seleção desmarcar ao clicar Tela_d10



    .................................................................................




    Untitled Document





    Connekta Informática Apoia:


    Chapada dos Veadeiros - Alto Paraíso de Goiás
    Venha conhecer as belezas naturais desta cidade.


    Clique Aqui


    Lembrete: Desfrutar e Preservar é um direito de Todos.




    IvanJr.
    IvanJr.
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 664
    Registrado : 22/11/2016

    [Resolvido]Caixa de Seleção desmarcar ao clicar Empty Re: [Resolvido]Caixa de Seleção desmarcar ao clicar

    Mensagem  IvanJr. em 17/10/2018, 20:29

    Veja o exemplo em anexo

    Código utilizado
    Código:
    Private Sub chkContaBancaria_AfterUpdate() 'após atualizar

        If Me!chkContaBancaria = True Then
            Me!chkGeral = False
            Me!chkFornecedor = False
        End If

    End Sub

    Private Sub chkDataPagamento_AfterUpdate() 'após atualizar

        If Me!chkDataPagamento = True Then Me!chkGeral = False

    End Sub

    Private Sub chkDataVencimento_AfterUpdate() 'após atualizar

        If Me!chkDataVencimento = True Then Me!chkGeral = False

    End Sub

    Private Sub chkFornecedor_AfterUpdate() 'após atualizar

        If Me!chkFornecedor = True Then
            Me!chkGeral = False
            Me!chkContaBancaria = False
        End If

    End Sub

    Private Sub chkGeral_AfterUpdate() 'após atualizar

        If Me!chkGeral = True Then
            Me!chkDataPagamento = False
            Me!chkDataVencimento = False
            Me!chkFornecedor = False
            Me!chkContaBancaria = False
        End If

    End Sub
    Anexos
    [Resolvido]Caixa de Seleção desmarcar ao clicar AttachmentExemplo Checkbox.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (28 Kb) Baixado 19 vez(es)
    Connekta Informatica
    Connekta Informatica
    VIP
    VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1040
    Registrado : 01/07/2011

    [Resolvido]Caixa de Seleção desmarcar ao clicar Empty Re: [Resolvido]Caixa de Seleção desmarcar ao clicar

    Mensagem  Connekta Informatica em 18/10/2018, 14:26

    Bom dia

    Obrigado pela atenção. Meu formulário esta diferente do seu seu, porque use porque usei um quadro de opções.

    Veja o formulário no bd em aenxo.
    Anexos
    [Resolvido]Caixa de Seleção desmarcar ao clicar AttachmentSistema Financeiro - Cópia.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (74 Kb) Baixado 11 vez(es)


    .................................................................................




    Untitled Document





    Connekta Informática Apoia:


    Chapada dos Veadeiros - Alto Paraíso de Goiás
    Venha conhecer as belezas naturais desta cidade.


    Clique Aqui


    Lembrete: Desfrutar e Preservar é um direito de Todos.




    IvanJr.
    IvanJr.
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 664
    Registrado : 22/11/2016

    [Resolvido]Caixa de Seleção desmarcar ao clicar Empty Re: [Resolvido]Caixa de Seleção desmarcar ao clicar

    Mensagem  IvanJr. em 18/10/2018, 16:49

    Deixo duas alternativas para fazer o que queres:
    1 - Uma é limpar o valor do quadro de opções clicando em um rótulo.
    2 - Outra é limpar o valor do quadro de opções ao pressionar delete em uma das opções do quadro.

    Outra sugestão é refazer os controles do formulário com checkboxes e adaptar conforme minha primeira mensagem.
    Anexos
    [Resolvido]Caixa de Seleção desmarcar ao clicar AttachmentSistema Financeiro - Cópia_rev.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (69 Kb) Baixado 34 vez(es)
    Connekta Informatica
    Connekta Informatica
    VIP
    VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1040
    Registrado : 01/07/2011

    [Resolvido]Caixa de Seleção desmarcar ao clicar Empty Re: [Resolvido]Caixa de Seleção desmarcar ao clicar

    Mensagem  Connekta Informatica em 19/10/2018, 19:37

    Desculpe a demora. Exemplo excelente. Fiz a adaptação e ficou do jeito que eu queria. obrigado.


    .................................................................................




    Untitled Document





    Connekta Informática Apoia:


    Chapada dos Veadeiros - Alto Paraíso de Goiás
    Venha conhecer as belezas naturais desta cidade.


    Clique Aqui


    Lembrete: Desfrutar e Preservar é um direito de Todos.




    IvanJr.
    IvanJr.
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 664
    Registrado : 22/11/2016

    [Resolvido]Caixa de Seleção desmarcar ao clicar Empty Re: [Resolvido]Caixa de Seleção desmarcar ao clicar

    Mensagem  IvanJr. em 19/10/2018, 19:55

    O fórum agradece o retorno. Sucesso.

    Conteúdo patrocinado

    [Resolvido]Caixa de Seleção desmarcar ao clicar Empty Re: [Resolvido]Caixa de Seleção desmarcar ao clicar

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 22/7/2019, 21:57