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

    Formatação condicional no access com com três campos

    avatar
    Ricardo Oliveira
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 10
    Registrado : 08/08/2017

    Formatação condicional no access com com três campos Empty Formatação condicional no access com com três campos

    Mensagem  Ricardo Oliveira 1/6/2019, 21:39

    Boa tarde pessoal,

    É minha primeira postagem neste grupo, e preciso de ajuda para solucionar meu problema.

    tenho um BD com vários campos, onde preciso mostrar o status do registro á medida que flego os campos:

    SEPARADO, CONFERIDO E EXPEDIDO. estou usando este código, mas só muda a cor para apenas duas condições, falta a terceira.

    If Me.Conferido.Value = não Then
    If Me.Separado.Value = sim Then
       Me.Data.BackColor = vbWhite
       Me.Data.ForeColor = vbBlack
    Else
       Me.Data.BackColor = vbYellow
       Me.Data.ForeColor = vbBlack

    End If
    End If

    Alguém pode me ajudar?
    grato.
    crysostomo
    crysostomo
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

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

    Formatação condicional no access com com três campos Empty Re: Formatação condicional no access com com três campos

    Mensagem  crysostomo 6/6/2019, 19:38

    Bom tarde colega, no caso eu colocaria  o condicional ..
    mas, pelo caso segue anexo:


    Código:
    Private Sub Combinação9_Click()
      
    If Me.mudarDeCor.Value = "sim" Then
       Me.data.BackColor = vbGreen
       Me.data.ForeColor = vbBlack

    ElseIf Me.mudarDeCor.Value = "não" Then
       Me.data.BackColor = vbRed
       Me.data.ForeColor = vbBlack

    Else
       Me.data.BackColor = vbYellow
       Me.data.ForeColor = vbBlack
    End If

    End Sub
    Anexos
    Formatação condicional no access com com três campos AttachmentMudarCor.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (29 Kb) Baixado 20 vez(es)


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

      Data/hora atual: 27/4/2024, 01:46