MaximoAccess

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

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


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.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

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

    Fechar subformulário e desfazer campo preenchido

    avatar
    FABIOSIAMES
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 204
    Registrado : 14/06/2010

    Fechar subformulário e desfazer campo preenchido Empty Fechar subformulário e desfazer campo preenchido

    Mensagem  FABIOSIAMES 28/2/2012, 12:50

    Pessoal bom dia.

    Estou com uma dúvida.

    criei um formulário que de filtro de dia, por sinal fui ajudados por vcs.

    Nele tem um subform que mostra os dados que eu quero que filtro.

    Tenho um campo do tipo do tipo verdadeiro/falso.

    consigo editar para colocar os que serão verdadeiro, para gerar relatório dos que serão verdadeiros, mas se fecho o formulário ele salva o valor.

    Queria que ao fechar que esses campo que forão marcados como verdadeiro voltasse não salvasse na tabela.

    Como posso fazer?

    obrigado pela ajuda.
    avatar
    Convidad
    Convidado


    Fechar subformulário e desfazer campo preenchido Empty Re: Fechar subformulário e desfazer campo preenchido

    Mensagem  Convidad 28/2/2012, 16:41


    Olá!

    Estou com dificuldades pra entender sua questão.
    Este campo CheckBox está no form ou no subform? E o que ele faz exatamente?

    Parece que vc está usando CheckBox's acopladas (da tabela) e por isso o valor do campo fica registrado.

    Mas precisa esclarecer melhor.
    avatar
    FABIOSIAMES
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 204
    Registrado : 14/06/2010

    Fechar subformulário e desfazer campo preenchido Empty Re: Fechar subformulário e desfazer campo preenchido

    Mensagem  FABIOSIAMES 28/2/2012, 19:13

    Então estou usando uma caixa de seleção que quando inclui o campo ele veio como caixa de seleção.

    Porém esse campo fica dentro do subformulário que é da consulta.

    Só que quando fecho o formulário principal ele salvar oque alterei na consulta e grava o campo que alterei.

    Não to sabendo como fazer para quando fechar esse formulário, tudo que coloquei como verdadeiro volte a ser falso.

    como não tivesse clicado em nada.

    Obrigado.
    avatar
    Convidad
    Convidado


    Fechar subformulário e desfazer campo preenchido Empty Re: Fechar subformulário e desfazer campo preenchido

    Mensagem  Convidad 28/2/2012, 21:27


    Pelo que consegui garimpar nas suas informações, vc tem um formulário principal com um subformulário, onde há um campo CheckBox que vc marca para identificar os registros que serão exibidos num relatório.
    E quer que, ao fechar o formulário, estas CheckBox's dos registros do subformulário fiquem todas desmarcadas (False).

    É isso?
    avatar
    FABIOSIAMES
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 204
    Registrado : 14/06/2010

    Fechar subformulário e desfazer campo preenchido Empty Re: Fechar subformulário e desfazer campo preenchido

    Mensagem  FABIOSIAMES 28/2/2012, 22:51

    iSSO MESMO.

    DESCULPE NÃO SABER ME EXPLICAR DIREITO.

    MAS É ISSO MESMO.
    avatar
    Convidad
    Convidado


    Fechar subformulário e desfazer campo preenchido Empty Re: Fechar subformulário e desfazer campo preenchido

    Mensagem  Convidad 28/2/2012, 23:04


    Tente isso:
    Coloque o código abaixo no evento AoFechar do subformulário:

    Private Sub Form_Close()
    On Error GoTo Trato

    Dim ctl As Control
    For Each ctl In Me.Controls
    If ctl.ControlType = acCheckBox Then
    ctl.Value = 0 '0 para desmarcado(False), -1 para marcado(True)
    End If
    Next

    Exit Sub
    Trato: MsgBox Err.Description
    End Sub

    avatar
    Convidad
    Convidado


    Fechar subformulário e desfazer campo preenchido Empty Re: Fechar subformulário e desfazer campo preenchido

    Mensagem  Convidad 29/2/2012, 00:33


    Veja este tópico:
    http://maximoaccess.forumeiros.com/t2189-resolvidoapagar-dados-de-subformulario?highlight=apagar
    avatar
    FABIOSIAMES
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 204
    Registrado : 14/06/2010

    Fechar subformulário e desfazer campo preenchido Empty Re: Fechar subformulário e desfazer campo preenchido

    Mensagem  FABIOSIAMES 6/3/2012, 14:02

    Oi tudo bem.

    Coloquei o código no evento ao fechar, dai quando fecho o formulário principal dá a seguinte mensagem.

    "você não pode atribuir um valor a este objeto".

    Oque pode estar acontecendo.

    Obrigado pessoal pela ajuda.
    avatar
    Convidad
    Convidado


    Fechar subformulário e desfazer campo preenchido Empty Re: Fechar subformulário e desfazer campo preenchido

    Mensagem  Convidad 6/3/2012, 20:11


    Tente num outro evento do subform, como Form_Deactivate() ou Form_Unload(Cancel As Integer)

      Data/hora atual: 6/10/2022, 07:20