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


3 participantes

    [Resolvido]Habilitar e Desabilitar campos

    avatar
    zuuGG
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 36
    Registrado : 29/10/2013

    [Resolvido]Habilitar e Desabilitar campos Empty [Resolvido]Habilitar e Desabilitar campos

    Mensagem  zuuGG 13/7/2016, 15:34

    Caros, bom dia!

    Estou tendo um problema ao tentar habilitar ou desabilitar alguns checkbutton em meu formulário.

    O erro que ocorre é o seguinte: "Método ou membro de dados não encontrado"

    Segue o código para validação:

    Private Sub lst_Divergencia_AfterUpdate() ***O erro ocorre aqui no inicio***

       If Me.lst_Divergencia.Value = "Não" Then
           
           Me.chk_ComprovanteEnd.Enabled = False
           Me.chk_DadosCadastrais.Enable = False
           Me.chk_Elegibilidade.Enable = False
           Me.chk_Implantacao.Enable = False
           Me.chk_Intercambio.Enable = False
           Me.chk_ReducaoCarencia.Enable = False
           Me.chk_SemValEnd.Enable = False
           Me.chk_AtivoReducao.Enable = False
           Me.chk_Valor.Enable = False
           Me.chk_Email.Enable = False
           Me.chk_CategPlano.Enable = False
           Me.chk_PlanDental.Enable = False
           Me.chk_DeclaCarencia.Enable = False
           Me.chk_Entidade.Enable = False
           Me.chk_Vigencia.Enable = False
           Me.chk_DocComprob.Enable = False
           Me.chk_Fatura.Enable = False
           Me.chk_DadosDepen.Enable = False
           Me.chk_DadoRespFinan.Enable = False
           Me.chk_Telefone.Enable = False
           Me.chk_DadosBanc.Enable = False
           Me.chk_CancelPlan.Enable = False
       
       Else
               
       
           Me.chk_ComprovanteEnd.Enabled = True
           Me.chk_DadosCadastrais.Enable = True
           Me.chk_Elegibilidade.Enable = True
           Me.chk_Implantacao.Enable = True
           Me.chk_Intercambio.Enable = True
           Me.chk_ReducaoCarencia.Enable = True
           Me.chk_SemValEnd.Enable = True
           Me.chk_AtivoReducao.Enable = True
           Me.chk_Valor.Enable = True
           Me.chk_Email.Enable = True
           Me.chk_CategPlano.Enable = True
           Me.chk_PlanDental.Enable = True
           Me.chk_DeclaCarencia.Enable = True
           Me.chk_Entidade.Enable = True
           Me.chk_Vigencia.Enable = True
           Me.chk_DocComprob.Enable = True
           Me.chk_Fatura.Enable = True
           Me.chk_DadosDepen.Enable = True
           Me.chk_DadoRespFinan.Enable = True
           Me.chk_Telefone.Enable = True
           Me.chk_DadosBanc.Enable = True
           Me.chk_CancelPlan.Enable = False
           
       End If

    End Sub


    Alguém pode me dar uma luz do que pode estar ocorrendo?
    FabioPaes
    FabioPaes
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3914
    Registrado : 14/08/2013

    [Resolvido]Habilitar e Desabilitar campos Empty Re: [Resolvido]Habilitar e Desabilitar campos

    Mensagem  FabioPaes 13/7/2016, 16:06

    Possivelmente é problema com nome dos Campos... Reveja os nomes dos campos principalmente esse da primeira linha... Veja se nao tem Caracter especial... Se possível renomeio-o...


    .................................................................................
    _____________________________________________________________________
    Achou a solução para sua dúvida? Não seja Egoísta, Compartilhe com todos!
    A dica do Colega foi útil? Agradeça!

    O importante não saber tudo, mas sim a Onde procurar!
    avatar
    zuuGG
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 36
    Registrado : 29/10/2013

    [Resolvido]Habilitar e Desabilitar campos Empty Re: [Resolvido]Habilitar e Desabilitar campos

    Mensagem  zuuGG 13/7/2016, 18:31

    Olá Fabio, boa tarde!

    Primeiramente, obrigado pelo retorno, eu realizei o ajuste na nomeclatura de todos os campos, porém o erro ainda persiste, o código continua travando no incio.

    Segue código com a nomeclatura ajustada para validação:

    Private Sub cblDivergencia_AfterUpdate()

    If Me.cblDivergencia.Value = "NÃO" Then

    Me.chkComprovanteEnd.Enabled = False
    Me.chkDadosCadastrais.Enable = False
    Me.chkElegibilidade.Enable = False
    Me.chkImplantacao.Enable = False
    Me.chkIntercambio.Enable = False
    Me.chkReducaoCarencia.Enable = False
    Me.chkSemValEnd.Enable = False
    Me.chkAtivoReducao.Enable = False
    Me.chkValor.Enable = False
    Me.chkEmail.Enable = False
    Me.chkCategPlano.Enable = False
    Me.chkPlanDental.Enable = False
    Me.chkDeclaCarencia.Enable = False
    Me.chkEntidade.Enable = False
    Me.chkVigencia.Enable = False
    Me.chkDocComprob.Enable = False
    Me.chkFatura.Enable = False
    Me.chkDadosDepen.Enable = False
    Me.chkDadoRespFinan.Enable = False
    Me.chkTelefone.Enable = False
    Me.chkDadosBanc.Enable = False
    Me.chkCancelPlan.Enable = False

    Else


    Me.chkComprovanteEnd.Enabled = True
    Me.chkDadosCadastrais.Enable = True
    Me.chkElegibilidade.Enable = True
    Me.chkImplantacao.Enable = True
    Me.chkIntercambio.Enable = True
    Me.chkReducaoCarencia.Enable = True
    Me.chkSemValEnd.Enable = True
    Me.chkAtivoReducao.Enable = True
    Me.chkValor.Enable = True
    Me.chkEmail.Enable = True
    Me.chkCategPlano.Enable = True
    Me.chkPlanDental.Enable = True
    Me.chkDeclaCarencia.Enable = True
    Me.chkEntidade.Enable = True
    Me.chkVigencia.Enable = True
    Me.chkDocComprob.Enable = True
    Me.chkFatura.Enable = True
    Me.chkDadosDepen.Enable = True
    Me.chkDadoRespFinan.Enable = True
    Me.chkTelefone.Enable = True
    Me.chkDadosBanc.Enable = True
    Me.chkCancelPlan.Enable = False

    End If

    End Sub

    Tem alguma outra ideia do que pode ser?
    Avelino Sampaio
    Avelino Sampaio
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3877
    Registrado : 04/04/2010

    [Resolvido]Habilitar e Desabilitar campos Empty Re: [Resolvido]Habilitar e Desabilitar campos

    Mensagem  Avelino Sampaio 13/7/2016, 19:23

    Olá!

    Observe que vc escreveu ENABLE.  Está falatando um D (ENABLED)

    Aguardamos


    .................................................................................
    Vídeos, livros, kit MontaRibbons e acesso irrestrito ao site UsandoAcces  
    Clique AQUI e analise o custo beneficio do material oferecido.
    avatar
    zuuGG
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 36
    Registrado : 29/10/2013

    [Resolvido]Habilitar e Desabilitar campos Empty Re: [Resolvido]Habilitar e Desabilitar campos

    Mensagem  zuuGG 14/7/2016, 17:01

    Olá Avelino, boa tarde!

    O problema foi solucionado, realmente não havia me atentado na falta do "D" no final do EnableD, após realizar o ajuste o código funcionou normalmente.

    Obrigado pelo auxilio!
    avatar
    zuuGG
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 36
    Registrado : 29/10/2013

    [Resolvido]Habilitar e Desabilitar campos Empty Re: [Resolvido]Habilitar e Desabilitar campos

    Mensagem  zuuGG 19/7/2016, 01:51

    Problema Resolvido! Obrigado!

    Conteúdo patrocinado


    [Resolvido]Habilitar e Desabilitar campos Empty Re: [Resolvido]Habilitar e Desabilitar campos

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 28/3/2024, 13:19