MaximoAccess

Caro Usuário, não tire as suas duvidas nas Salas de Repositório, abra sempre um novo tópico relacionado, nas salas destinadas para o efeito, como Sala de Tabelas, Consultas, Formulários, Relatórios, Macros, Módulos e VBA.

Obrigado

Administração do MaximoAccess

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access

    Caixa de Seleção quando ativo mudar cor de Campo.

    Compartilhe

    brunolsc
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 28
    Registrado : 03/04/2011

    Caixa de Seleção quando ativo mudar cor de Campo.

    Mensagem  brunolsc em Sex 19 Set 2014, 02:20

    Boa noite, gostaria que alguem me ajudasse se possivel.

    Tenho esse codigo:

    Private Sub MARCADO_AfterUpdate()
    If MARCADO.Value = -1 Then
    Me.NOME.BackColor = RGB(236, 240, 254)

    End If

    End Sub

    Que quando eu ativo a caixa de seleção o campo nome fica na cor roxo claro, so que eu queria q essa cor so ficasse no campo do registro q marquei, pois quando eu vou cadastrar mais uma pessoa o campo ja se encontra roxo, e eu queria q ao criar um novo a cor desse campo ficasse normal e ao pesquisar o registro que a caixa de seleção foi ativado, o campo nome ai sim estaria roxo.

    Bem espero q eu tenha conseguido explicar oq eu gostaria.

    Vlw galera,, grande abraço

    LiveBrain
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 182
    Registrado : 15/05/2011

    Re: Caixa de Seleção quando ativo mudar cor de Campo.

    Mensagem  LiveBrain em Sex 19 Set 2014, 02:45

    crie uma function e faça a chamada na propriedade "No Atual" do form e na "Após alterar" da Caixa de Seleção

    Seu código vai ficar mais ou menos assim


    Código:
    Private Sub Form_Current()
      AlteraCor
    end sub

    Código:
    Private Sub MARCADO_AfterUpdate()
      AlteraCor
    End Sub



    Código:
    Function AlteraCor()

    If MARCADO.Value = -1 Then
        Me.NOME.BackColor = RGB(236, 240, 254)
    else
        Me.NOME.BackColor = RGB(255, 255, 255)
    End If

    end function
    end sub


    .................................................................................
    Abraços

    Live Brain Tutoriais

    "Fraca é a pessoa que não conhece a força que possui nos amigos"

    brunolsc
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 28
    Registrado : 03/04/2011

    Re: Caixa de Seleção quando ativo mudar cor de Campo.

    Mensagem  brunolsc em Sex 19 Set 2014, 15:22

    Muitoooooo obrigado.. funcionou como eu gostaria.... muito agradecido..



    abraços

    Alexandre Neves
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

    Re: Caixa de Seleção quando ativo mudar cor de Campo.

    Mensagem  Alexandre Neves em Sex 19 Set 2014, 19:38

    Boa tarde,
    Dê a assunto por "Resolvido"
    Lembre-se de acompanhar, pelo menos, as suas dúvidas (http://www.maximoaccess.com/t18263-importar-campo-de-site#135568)


    .................................................................................
    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

    brunolsc
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 28
    Registrado : 03/04/2011

    Re: Caixa de Seleção quando ativo mudar cor de Campo.

    Mensagem  brunolsc em Sex 19 Set 2014, 20:24

    Opa boa tarde, desculpe ... e q restou uma duvida que tenho q tirar aki ainda.... o codigo q ele me passou foi show deu tudo certo...

    Minha duvida e a seguinte, quando coloco o formulario dividido o campo Nome em baixo n fica em vermelho so na parte de cima, tem algum codigo que tb faça a parte da listagem no campo nome fique colorido??

    Aguardo Retorno, vlw

      Data/hora atual: Qui 08 Dez 2016, 00:08