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

    [Resolvido]Check box para limpar um campo.

    avatar
    xxtailssxx
    Novato
    Novato

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 14
    Registrado : 08/10/2020

    [Resolvido]Check box para limpar um campo. Empty [Resolvido]Check box para limpar um campo.

    Mensagem  xxtailssxx 25/1/2021, 17:02

    Alguém poderia ajudar ?

    queria saber se tem alguma maneira simples de limpar um campo ao clikar em um check box,
    não consegui achar nada parecido em busca avançada no forum, talvez não tenha pesquisado direito, mas grato se alguém puder ajudar.


    Segue a imagem, no caso quando clikar no check box, ele limpar o campo de Id Empresa da lock, e se desmarcar, deixar habilitado novamente.

    [Resolvido]Check box para limpar um campo. Screen18
    avatar
    Ismael Silva
    Super Avançado
    Super Avançado

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 748
    Registrado : 11/12/2017

    [Resolvido]Check box para limpar um campo. Empty Re: [Resolvido]Check box para limpar um campo.

    Mensagem  Ismael Silva 25/1/2021, 17:36

    Boa tarde,

    Esse código abaixo não ajuda?

    Me.nomedocampoalimpar=""
    me.nomedocampoalimpar,enabled= true

    ssporch e xxtailssxx gostam desta mensagem

    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador

    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Check box para limpar um campo. Empty Re: [Resolvido]Check box para limpar um campo.

    Mensagem  DamascenoJr. 28/1/2021, 23:39

    Vitor, a dica resolveu?


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.

    xxtailssxx gosta desta mensagem

    AbymaelSousa
    AbymaelSousa
    Intermediário
    Intermediário

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 79
    Registrado : 07/06/2017

    [Resolvido]Check box para limpar um campo. Empty Re: [Resolvido]Check box para limpar um campo.

    Mensagem  AbymaelSousa 5/2/2021, 13:31

    xxtailssxx escreveu:queria saber se tem alguma maneira simples de limpar um campo ao clikar em um check box,
    não consegui achar nada parecido em busca avançada no forum, talvez não tenha pesquisado direito, mas grato se alguém puder ajudar.

    Você pode utilizar a dica do Ismael Silva. Lembrando que esteticamente ficaria melhor você limpar também o valor da ComboBox Nome Empresa, quando clicar na Check Box "Todas as Empresas". Uma desvantagem que eu vejo aí nessa foto, é que você fica sem opção de retornar ao ComboBox "Nome Empresa" para selecionar uma empresa individual CASO se arrependa de clicar em "Todas as Empresas". Seria mais interessante você adicionar um campo na ComboBox "Todas as empresas" e o valor dela no ID Empresa seria "", assim o usuário tem a possibilidade de mudar de forma mais eficiente de "Todas as Empresas" para uma empresa específica (válida apenas caso você não precise mais inserir novas empresas).

    Outra opção é alterar esse botão de opção para Sim/Não, onde você consegue desmarcar e marcar ela, assim te dá mais flexibilidade e você utiliza a dica do Ismael Silva.

    julianovv e xxtailssxx gostam desta mensagem

    avatar
    dwbdennis
    Novato
    Novato

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2
    Registrado : 28/02/2012

    [Resolvido]Check box para limpar um campo. Empty Re: [Resolvido]Check box para limpar um campo.

    Mensagem  dwbdennis 5/2/2021, 19:05

    Private Sub CheckBoxSelecionarEmpresa_AfterUpdate()

    On Error GoTo erro

    If Me.CheckBoxSelecionarEmpresa = True Then

    Me.CheckBoxTodasAsEmpresa = False

    Me.Periodo01.Enabled = True
    Me.Periodo02.Enabled = True
    Me.IdDaEmpresa.Enabled = True
    Me.TipoDeEvento.Enabled = True
    Me.NomeDaEmpresa.Enabled = True

    Me.Periodo01 = ""
    Me.Periodo02 = ""
    Me.IdDaEmpresa = ""
    Me.TipoDeEvento = ""
    Me.NomeDaEmpresa = ""

    Me.Periodo01.SetFocus

    End If

    erro:

    Exit Sub




    End Sub

    Private Sub CheckBoxTodasAsEmpresa_AfterUpdate()

    On Error GoTo erro

    If Me.CheckBoxTodasAsEmpresa = True Then

    Me.CheckBoxSelecionarEmpresa = False

    Me.Periodo01 = ""
    Me.Periodo02 = ""
    Me.IdDaEmpresa = ""
    Me.TipoDeEvento = ""
    Me.NomeDaEmpresa = ""

    Me.Periodo01.Enabled = False
    Me.Periodo02.Enabled = False
    Me.IdDaEmpresa.Enabled = False
    Me.TipoDeEvento.Enabled = False
    Me.NomeDaEmpresa.Enabled = False

    End If

    erro:

    Exit Sub





    End Sub

    Private Sub Form_Load()

    On Error GoTo erro

    Me.CheckBoxSelecionarEmpresa = True


    If Me.CheckBoxSelecionarEmpresa = True Then

    Me.CheckBoxTodasAsEmpresa = False

    Me.Periodo01.Enabled = True
    Me.Periodo02.Enabled = True
    Me.IdDaEmpresa.Enabled = True
    Me.TipoDeEvento.Enabled = True
    Me.NomeDaEmpresa.Enabled = True

    Me.Periodo01 = ""
    Me.Periodo02 = ""
    Me.IdDaEmpresa = ""
    Me.TipoDeEvento = ""
    Me.NomeDaEmpresa = ""

    Me.Periodo01.SetFocus

    End If

    erro:

    Exit Sub

    End Sub

    AbymaelSousa e xxtailssxx gostam desta mensagem

    avatar
    xxtailssxx
    Novato
    Novato

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 14
    Registrado : 08/10/2020

    [Resolvido]Check box para limpar um campo. Empty Re: [Resolvido]Check box para limpar um campo.

    Mensagem  xxtailssxx 5/2/2021, 19:09

    Consegui resolver sim, obrigado !

    vou fechar aqui o tópico.

      Data/hora atual: 13/4/2021, 14:27