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


4 participantes

    [Resolvido]Disponibilidade de campos de acordo com uma combo box

    avatar
    Marlo Sandrei
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 10
    Registrado : 21/12/2016

    [Resolvido]Disponibilidade de campos de acordo com uma combo box Empty [Resolvido]Disponibilidade de campos de acordo com uma combo box

    Mensagem  Marlo Sandrei 15/4/2022, 00:03

    Tem com eu bloquear ou desbloquear um campo de acordo com a seleção que eu fizer dentro de listebox formulario?
    Ex: Campo1 (Empresa, Casa, Escola)
    Campo 2: CNPJ da empresa (ficar disponível apenas se eu selecionar a opção empresa)
    Campo 3: Nome do responsavel
    Campo 4: Endereço.

    De acordo com o que eu for selecionando em campos dentro do formulário, terei campos bloqueados ou campos desbloqueados (disponíveis para preenchimento).

    Preciso muito...
    Por favor, alguem mim ajuda.
    bgd
    avatar
    Ismael Silva
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Disponibilidade de campos de acordo com uma combo box Empty Re: [Resolvido]Disponibilidade de campos de acordo com uma combo box

    Mensagem  Ismael Silva 16/4/2022, 16:01

    Bom dia,


    Você pode tentar no evento após atualizar do seu campo1:


    If Texto0 = "Empresa" Then

    Me.Texto2.Enabled = True

    Else

    Me.Texto2.Enabled = False


    End If

    Marlo Sandrei gosta desta mensagem

    crysostomo
    crysostomo
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2752
    Registrado : 23/01/2018

    [Resolvido]Disponibilidade de campos de acordo com uma combo box Empty Re: [Resolvido]Disponibilidade de campos de acordo com uma combo box

    Mensagem  crysostomo 16/4/2022, 16:05

    Eu ficar acompanhando.
    Esse código é somente para condição, mesmo colocando o selected(2) ele não está  funcionando.
    Pois a lustBox seleciona a lista toda e não o campo da coluna .


    .................................................................................
    Obs.: Coloque somente as partes defeituosas para que possamos encontrar e entender  o problema mais rápido para lhe ajudar. Disponho.
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.

    Marlo Sandrei gosta desta mensagem

    Alexandre Fim
    Alexandre Fim
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3501
    Registrado : 13/12/2016

    [Resolvido]Disponibilidade de campos de acordo com uma combo box Empty Re: [Resolvido]Disponibilidade de campos de acordo com uma combo box

    Mensagem  Alexandre Fim 16/4/2022, 19:47

    Olá Marlo,

    Por gentileza, disponibilize uma cópia do seu bd para análise e solução do problema.

    Grato

    Alexandre Fim


    .................................................................................
    Arrow  Marcar tópico como Resolvido: clique aqui
    Arrow  Postar anexos no fórum: clique aqui

    [Resolvido]Disponibilidade de campos de acordo com uma combo box Setinf11
    Sistemas e Tecnologia Ltda

    Marlo Sandrei gosta desta mensagem

    avatar
    Marlo Sandrei
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 10
    Registrado : 21/12/2016

    [Resolvido]Disponibilidade de campos de acordo com uma combo box Empty Re: [Resolvido]Disponibilidade de campos de acordo com uma combo box

    Mensagem  Marlo Sandrei 10/4/2023, 15:13

    Bom dia
    O projeto inicial acabei não precisando fazer mais, contudo ja precisei do código para um novo projeto.

    'No evento ao atualizar do campo no formulario

    On Error GoTo Erro
    Dim Exame As String
       If Opcao = True Then
           Me.Endereço_da_ocorrencia.Enabled = True
           Me.Bairro.Enabled = True
           Me.Zona.Enabled = True
           Me.Nº_DO.Enabled = True
           Me.Causa.Enabled = True
           Me.Tipo.Enabled = True
       Else
           Me.Endereço_da_ocorrencia.Enabled = False
           Me.Bairro.Enabled = False
           Me.Zona.Enabled = False
           Me.Nº_DO.Enabled = False
           Me.Causa.Enabled = False
           Me.Tipo.Enabled = False
           
       End If
    Erro:

    To utilizando esse, adaptado do Ismael Silva, e ta funcionando perfeitamente.

    Obg pessoal

    Conteúdo patrocinado


    [Resolvido]Disponibilidade de campos de acordo com uma combo box Empty Re: [Resolvido]Disponibilidade de campos de acordo com uma combo box

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 8/12/2024, 05:51