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


2 participantes

    Formulário com botões ativos conforme condição cadastrada

    avatar
    eduas65
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 42
    Registrado : 30/10/2012

    Formulário com botões ativos conforme condição cadastrada Empty Formulário com botões ativos conforme condição cadastrada

    Mensagem  eduas65 30/3/2018, 17:50

    Caros, peço ajuda na montagem de uma solução que permita construir um formulário para a seguinte operação;

    Há uma tabela de cadastro de cliente e uma segunda tabela vinculada com cadastro das modalidades que o cliente pratica. O que necessito seria um form aonde selecionado o cliente, conforme a modalidade cadastrada previamente(conforme mostra o subform na imagem), o botão de evento respectivo ficasse ativo ou não.

    Na imagem do link abaixo apresento o layout imaginado.

    Formulário com botões ativos conforme condição cadastrada Formte11


    Agradeço desde já qualquer colaboração e alternativas.

    Eduardo Alves
    toyebom
    toyebom
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 1128
    Registrado : 18/07/2012

    Formulário com botões ativos conforme condição cadastrada Empty Formulário com botões ativos conforme condição cadastrada

    Mensagem  toyebom 1/4/2018, 01:24

    No evento do form, No Actual colocas:

    Código:
    If Me.Campo = "Esporte Modalidade 1" Then
    Me.botão.Enabled = True
    Else
    Me.botão.Enabled = False
    End If

    Utilizas o código 4 vezes um para cada modalidade, mudas é o nome do campo e do botão


    .................................................................................
    Gente Simples, fazendo coisas pequenas, em lugares pouco importantes, consegue mudanças extraordinárias.
    toyebom
    toyebom
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 1128
    Registrado : 18/07/2012

    Formulário com botões ativos conforme condição cadastrada Empty Formulário com botões ativos conforme condição cadastrada

    Mensagem  toyebom 1/4/2018, 01:39

    Não tinha visto que era subform.


    Código:
    If Me!Subform.Form.Campo = "Esporte Modalidade 1" Then
    Me.botão.Enabled = True
    Else
    Me.botão.Enabled = False
    End If

    Não testei mas deve ser por aqui.


    .................................................................................
    Gente Simples, fazendo coisas pequenas, em lugares pouco importantes, consegue mudanças extraordinárias.
    avatar
    eduas65
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 42
    Registrado : 30/10/2012

    Formulário com botões ativos conforme condição cadastrada Empty Formulário com botões ativos conforme condição cadastrada

    Mensagem  eduas65 2/4/2018, 23:22

    Caro amigo, agradeço a atenção mas esclareço que na verdade a ativação ou não do botão, seria dependente de .caption deste botão ser igual ou não a condição cadastrada no cliente (como na tela anexa), não seria genérica como programou.

    Agradeço sinceramente pela boa vontade, mas continuemos tentando.


    Eduardo
    toyebom
    toyebom
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 1128
    Registrado : 18/07/2012

    Formulário com botões ativos conforme condição cadastrada Empty Formulário com botões ativos conforme condição cadastrada

    Mensagem  toyebom 3/4/2018, 00:01

    Mas é isso mesmo que estou a tentar explicar.

    Imagina que o subform chama-se Sub1 e os campos das opções do subform são TX1; TX2; TX3; TX4 e os botões são B1; B2; B3; B4, fazes o código para todos mais ou menos assim:

    Código:
    If Me!Sub1.Form.TX1= "Esporte Modalidade 1" Then
    Me.B1.Enabled = True
    Else
    Me.B1.Enabled = False
    End If
    If Me!Sub1.Form.TX2= "Esporte Modalidade 2" Then
    Me.B2.Enabled = True
    Else
    Me.B2.Enabled = False
    End If
    If Me!Sub1.Form.TX3= "Esporte Modalidade 3" Then
    Me.B3.Enabled = True
    Else
    Me.B3.Enabled = False
    End If
    If Me!Sub1.Form.TX4= "Esporte Modalidade 4" Then
    Me.B4.Enabled = True
    Else
    Me.B4.Enabled = False
    End If


    .................................................................................
    Gente Simples, fazendo coisas pequenas, em lugares pouco importantes, consegue mudanças extraordinárias.

    Conteúdo patrocinado


    Formulário com botões ativos conforme condição cadastrada Empty Re: Formulário com botões ativos conforme condição cadastrada

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 14/5/2024, 19:11