MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

Obrigado

Administração do MaximoAccess

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

    [Resolvido]Formatação Condicional

    avatar
    msilveir
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 273
    Registrado : 13/03/2011

    [Resolvido]Formatação Condicional Empty [Resolvido]Formatação Condicional

    Mensagem  msilveir em 6/2/2020, 16:22

    Ola Pessoal

    tenho (3) campos com valores para fazer a regra de formatação condicional com a com Verde para valor mais baixo
    exemplo (valor 1 - 25,00) (valor 2 - 23,00) (valor 3 - 27,00)
    coloquei a regra no valor1 menor que valor2 e valor3 e assim para os outros so que quando tenho dois valores menores exemplo
    que esta acima os dois campos ficam em verde valor 1 e valor2 mas eu quero só o menor

    acho que fui claro



    crysostomo
    crysostomo
    VIP
    VIP

    Respeito às Regras 50%

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

    [Resolvido]Formatação Condicional Empty Re: [Resolvido]Formatação Condicional

    Mensagem  crysostomo em 6/2/2020, 21:27

    na aba formatar , tem a formatação condicional, clica en nova rega , la vc coloca entre valores


    .................................................................................
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.
    avatar
    msilveir
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 273
    Registrado : 13/03/2011

    [Resolvido]Formatação Condicional Empty Re: [Resolvido]Formatação Condicional

    Mensagem  msilveir em 7/2/2020, 15:27

    ola crysostomo

    coloquei mas ainda continua não funcionando.


    avatar
    msilveir
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 273
    Registrado : 13/03/2011

    [Resolvido]Formatação Condicional Empty Re: [Resolvido]Formatação Condicional

    Mensagem  msilveir em 7/2/2020, 16:12

    Ola crysostomo

    estou enviado uma imagem do formulário
    crysostomo
    crysostomo
    VIP
    VIP

    Respeito às Regras 50%

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

    [Resolvido]Formatação Condicional Empty Re: [Resolvido]Formatação Condicional

    Mensagem  crysostomo em 7/2/2020, 20:05

    passa o seu anexo explicando mais , porque pelo que entendi voce quer que um campo destaque com menor valor do outro .
    Código:
    Private Sub valor1_AfterUpdate()
    If Me.valor1 < Me.valor2 And Me.valor3 Then
        Me.valor1.BackColor = RGB(0, 255, 0) 'aqui coloca o verde
    Elseif me.valor1 > me.valor2 and me.valor3 then
    Me.valor1.BackColor = RGB(255, 255, 255) 'aqui volta par o branco
    e assim vai a lógica
    End If


    .................................................................................
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.
    avatar
    msilveir
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 273
    Registrado : 13/03/2011

    [Resolvido]Formatação Condicional Empty Re: [Resolvido]Formatação Condicional

    Mensagem  msilveir em 9/2/2020, 15:45

    Ola crysostomo

    coloquei os códigos para cada campo onde eu coloco o valor mas nao aplicou as cores pois que sempre o menor valor em verde

    Private Sub Valor1_AfterUpdate()
    If Me.Valor1 < Me.Valor2 And Me.Valor3 Then
    Me.Valor1.BackColor = RGB(78, 47, 47) 'aqui coloca o verde
    ElseIf Me.Valor1 > Me.Valor2 And Me.Valor3 Then
    Me.Valor1.BackColor = RGB(255, 255, 255) 'aqui volta par o branco

    End If
    End Sub

    Private Sub Valor2_AfterUpdate()
    If Me.Valor2 < Me.Valor1 And Me.Valor3 Then
    Me.Valor2.BackColor = RGB(78, 47, 47) 'aqui coloca o verde
    ElseIf Me.Valor2 > Me.Valor1 And Me.Valor3 Then
    Me.Valor2.BackColor = RGB(255, 255, 255) 'aqui volta par o branco
    End If
    End Sub

    Private Sub Valor3_AfterUpdate()
    If Me.Valor3 < Me.Valor1 And Me.Valor2 Then
    Me.Valor3.BackColor = RGB(78, 47, 47) 'aqui coloca o verde
    ElseIf Me.Valor3 > Me.Valor1 And Me.Valor2 Then
    Me.Valor3.BackColor = RGB(255, 255, 255) 'aqui volta par o branco

    End If
    End Sub

    crysostomo
    crysostomo
    VIP
    VIP

    Respeito às Regras 50%

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

    [Resolvido]Formatação Condicional Empty Re: [Resolvido]Formatação Condicional

    Mensagem  crysostomo em 9/2/2020, 17:22

    boa tarde amigo, estou reparando um sistema que estou fazendo para estágio e tcc.
    mande seu anexo aqui..
    que daqui a pouco eu vou ver isso.


    .................................................................................
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.
    avatar
    msilveir
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 273
    Registrado : 13/03/2011

    [Resolvido]Formatação Condicional Empty Re: [Resolvido]Formatação Condicional

    Mensagem  msilveir em 10/2/2020, 12:00

    Ola crysostomo

    segue o arquivo com formulário.
    Anexos
    [Resolvido]Formatação Condicional AttachmentSysCompra.zip
    arquivo
    Você não tem permissão para fazer download dos arquivos anexados.
    (58 Kb) Baixado 8 vez(es)
    crysostomo
    crysostomo
    VIP
    VIP

    Respeito às Regras 50%

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

    [Resolvido]Formatação Condicional Empty Re: [Resolvido]Formatação Condicional

    Mensagem  crysostomo em 10/2/2020, 18:43

    colega , boa tarde, eu não sei porque ele não esta funcionando nesse modo de layout, porque colocando ele como formulário comum ou no formulário de vários item ele funciona ele esta funcionando.
    vou dar uma olhada agora aqui.
    tipo
    Código:
    Function ConfereValor()
    If Me.Valor1 < Me.Valor2 And Me.Valor3 Then
        Me.Valor1.BackColor = RGB(0, 255, 0) 'aqui coloca o verde
    ElseIf Me.Valor1 > Me.Valor2 And Me.Valor3 Then
        Me.Valor1.BackColor = RGB(255, 255, 255) 'aqui volta par o branco

    End If
    End Function

    Private Sub Form_Load()
    Call ConfereValor
    End Sub
    formulário normal
    [Resolvido]Formatação Condicional Sem_tz63
    Formulario de varios item
    [Resolvido]Formatação Condicional Dwd10


    --


    .................................................................................
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.
    avatar
    msilveir
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 273
    Registrado : 13/03/2011

    [Resolvido]Formatação Condicional Empty Re: [Resolvido]Formatação Condicional

    Mensagem  msilveir em 13/2/2020, 23:54

    Ola crysostomo

    deixei com formulário normal numa linha só e blz

    muito obrigado pela sua ajuda
    crysostomo
    crysostomo
    VIP
    VIP

    Respeito às Regras 50%

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

    [Resolvido]Formatação Condicional Empty Re: [Resolvido]Formatação Condicional

    Mensagem  crysostomo em 14/2/2020, 18:49

    Vlw, Tmj .


    .................................................................................
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.

      Data/hora atual: 24/9/2020, 05:42