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

    [Resolvido]Caixa de Opções para mudar a cor de texto de outro campo

    avatar
    berninirobs
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 151
    Registrado : 14/09/2012

    [Resolvido]Caixa de Opções para mudar a cor de texto de outro campo Empty [Resolvido]Caixa de Opções para mudar a cor de texto de outro campo

    Mensagem  berninirobs 18/2/2023, 18:33

    Boa tarde.

    Queria que ao selecionar a Opção1 o campo de texto [nome_pac] mudasse de cor vermelho e 
    ao selecionar a Opção2 o mesmo campo de texto [nome_pac] mudasse de cor verde.

    Tentei deste jeito, mas não deu:


    Private Sub Quadro6_AfterUpdat()

    If Me.MeuCampo1.Value = True Then
    Me.nome_pac.ForeColor = vbRed
    End If

    If Me.MeuCampo2.Value = True Then
    Me.nome_pac.ForeColor = vbGreen
    End If

    End Sub


    Obrigado.......
    avatar
    berninirobs
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 151
    Registrado : 14/09/2012

    [Resolvido]Caixa de Opções para mudar a cor de texto de outro campo Empty Re: [Resolvido]Caixa de Opções para mudar a cor de texto de outro campo

    Mensagem  berninirobs 18/2/2023, 22:09

    Vejam banco em anexo......
    Anexos
    [Resolvido]Caixa de Opções para mudar a cor de texto de outro campo AttachmentGrupoDeOpçoesTest.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (201 Kb) Baixado 16 vez(es)
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 8454
    Registrado : 05/11/2009

    [Resolvido]Caixa de Opções para mudar a cor de texto de outro campo Empty Re: [Resolvido]Caixa de Opções para mudar a cor de texto de outro campo

    Mensagem  Alexandre Neves 19/2/2023, 12:30

    Bom dia
    Comece por aqui
    Código:
    Private Sub Quadro6_AfterUpdate()
        If Quadro6 = 1 Then
            nome_pac.ForeColor = vbRed
        ElseIf Quadro6 = 2 Then
            nome_pac.ForeColor = vbGreen
        End If
    End Sub
    Depois adapte para pintar apenas a linha corrente


    .................................................................................
    Access 2010. Mande bd que dê para testar (indique a versão). Não peça para fazer o que já tem feito. Dê todos os detalhes.
    Não coloquem entraves como senhas, esconder controlos, etc. Disponibilizem o mais limpo possível
    Só respondo a mensagens privadas, se forem de assunto privado; às outras não respondo.
    Quem trabalha e mata a fome não come o pão de ninguém; mas quem não trabalha e come, come sempre o pão de alguém. António Aleixo
    avatar
    berninirobs
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 151
    Registrado : 14/09/2012

    [Resolvido]Caixa de Opções para mudar a cor de texto de outro campo Empty Re: [Resolvido]Caixa de Opções para mudar a cor de texto de outro campo

    Mensagem  berninirobs 19/2/2023, 14:47

    Boa tarde Alexandre.

    Coloquei o código no evento Ao Pintar nos Detalhes e foi show de bola.

    Eu estava fazendo referencia ao campo e não ao Grupo de Opções.

    Muito obrigado mesmo para ter amenizado minha eterna burrice.

    Grato mesmo. 

    Um forte abraço quântico....

    Conteúdo patrocinado


    [Resolvido]Caixa de Opções para mudar a cor de texto de outro campo Empty Re: [Resolvido]Caixa de Opções para mudar a cor de texto de outro campo

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 23/7/2024, 03:29