[Resolvido]formatação condicional

boa tarde amigos, como estão?...

quem pode me ajudar, gostaria de usar uma formatação condicional em um campo que por exemplo:

quando determinado campo me retornar um valor 0, me retorna um texto "Não ha procedimento(s) disciplinar(es)"

por gentileza se alguém puder me ajudar... muito grato!!!

Boa noite,

rlss escreveu:quem pode me ajudar, gostaria de usar uma formatação condicional em um campo que por exemplo:

Não é com formatação condicional que chegará a esse resultado, mas com uma condicional.

Exemplo:

Código:

If Me.Campo = 0 Then
      'Caso seja para exibir em uma msgbox
      MsgBox "Não ha procedimento(s) disciplinar(es)", vbExclamation, "Atenção"
      'Caso deseje que seja exibido em outro campo no formulário
      Me.OutroCampo = "Não ha procedimento(s) disciplinar(es)"
End If

Marcelo bom dia deu certo, aparece um msgBox, mas eu gostaria que fosse dentro do campo é possível?
Obrigado desde de já...

rlss,

É só você substituir o msgbox para este comando, conforme o colega Marcelo passou.

Me.OutroCampo = "Não ha procedimento(s) disciplinar(es)"

Dessa forma, o aviso irá aparecer dentro de um campo.

agora consegui, deu certo, confundi e acabei colocando tudo junto, mas agora separei e deu certo... obrigado Ismael..

Faltou dar o tópico por resolvido

Veja como
https://www.maximoaccess.com/t860-resolucao-de-topicos

amigos boa tarde... poderiam me ajudar

agradeço pela atenção, ainda em relação ao código passado após outros testes, verifiquei que quando;

- o valor é 0 o resultado aparece em vermelho e a frase "não ha procedimentos ou documentos para o RE" - ok

- quando é valor 1 fica em branco e sem frase - ok

- porém quando o valor é 2 ou maior aparece em vermelho e a frase "não ha procedimentos ou documentos para o RE" ou seja teria que ficar em branco e sem frase...

como posso fazer neste caso? Tendo em vista que o resultado tem que aparecer realmente so se for (0), resultado maior tem que ficar em branco e sem frase!!!


Private Sub Form_Load()
If Me.[Expr1002] = 0 Then
   
  Me.[Texto10] = "Não ha procedimentos ou documentos para o RE"

End If
End Sub

Boa tarde,

Tente:

Private Sub Form_Load()
If Me.[Expr1002] = 0 Then

Me.[Texto10] = "Não ha procedimentos ou documentos para o RE"

Else

Me.[Texto10] = ""

End If
End Sub

Obrigado amigo vou tentar....

boa tarde amigo ismael,

testei o codigo, mas não deu certo...

igual ou acima de 2 ele continua apresentando a frase, seria o caso de colocar <0>

Private Sub Form_Load()

If Me.[Expr1002] = 0 Then

Me.[Texto10] = "Não ha procedimentos ou documentos para o RE"

Else

Me.[Texto10] = ""

End If

End Sub

obrigado

Dá uma olhada neste exemplo que eu fiz, tentei colocar a mesma lógica do teu projeto, olha se é isso.

Obrigado caros colegas, consegui ficou muito bom...

Ricardo...

Você conseguiu com base no exemplo, ou de outra forma?

Olá Ismael na verdade eu abri seu exemplo ele funciona do jeito que preciso sim... mas eu colei seu código e no me projeto não deu certo... fiz todas mudanças e mesmo assim na foi...  no meu projeto o campo que tem o valor "0" é um campo com expressão que calcula quantidade de registro não sei se isso interfere.. então oque eu fiz:

fiz uma formatação condicional; 1- se valor igual "0" fundo do.controle em vermelho
2- utilizei um rótulo com a frase " não há procedimento para o RE digitado" com cor de texto em branco e enviado para frente e a campo calculado com a formatação enviado para atrás, sendo rótulo e campo centralizados..

Resultado:
Quando o campo retorna o valor "0" então ela fica vermelha como fica atrás do rótulo com texto em branco aí é visualizavel a frase...

Quando abri seu exemplo e vi o texto em branco, depois de olhar mais atentamente percebi que dava pra usar no mesmo campo calculado com a formatação e lembrei das opções  enviar pra frente e para atrás... onde deu certo

E estou muito grato pela sua atenção e pelo exemplo..
Abraço

Blz, importante que resolveu. Neste caso, marque como Tópico resolvido.

Se estiver resolvido, então marque o tópico conforme esta situação.

Veja como fazer isso
https://www.maximoaccess.com/t860-resolucao-de-topicos

É importante dar este retorno para a organização do site.

Aguardamos.

muito obrigado a todos