OVH Cloud OVH Cloud

couleur police access97

3 réponses
Avatar
CMTI
dans Access97 (pas de mise en forme conditionnelle) je souhaite modifier la
couleur de la police d'un controle selon le contenu ( par ex, > 49 dans un
champ à données numériques, ou = NON dans un champ à données Oui/Non...)
mais n'arrive pas à trouver la bonne syntaxe avec ForeColor...
merci pour votre aide
d

3 réponses

Avatar
Ghislain
Bonjour,

Je crois que celui -ci marche bien

If [Forms]![TonFormulaire]![TonChamp]I Then

[Forms]![TonFormulaire]![TonChamp].ForeColor%5 'Rouge

End If

Ghislain





-----Message d'origine-----
dans Access97 (pas de mise en forme conditionnelle) je
souhaite modifier la

couleur de la police d'un controle selon le contenu (
par ex, > 49 dans un

champ à données numériques, ou = NON dans un champ à
données Oui/Non...)

mais n'arrive pas à trouver la bonne syntaxe avec
ForeColor...

merci pour votre aide
d


.



Avatar
merci mais pas de succès pour moi ?
j'ai essayé avec .Value, idem, et en définissant les
champs et les couleurs aussi (as lng) mais rien à faire !!!
doit y avoir un petit truc
-----Message d'origine-----
Bonjour,

Je crois que celui -ci marche bien

If [Forms]![TonFormulaire]![TonChamp]I Then

[Forms]![TonFormulaire]![TonChamp].ForeColor%5 'Rouge

End If

Ghislain





-----Message d'origine-----
dans Access97 (pas de mise en forme conditionnelle) je
souhaite modifier la

couleur de la police d'un controle selon le contenu (
par ex, > 49 dans un

champ à données numériques, ou = NON dans un champ à
données Oui/Non...)

mais n'arrive pas à trouver la bonne syntaxe avec
ForeColor...

merci pour votre aide
d


.

.





Avatar
Raymond [mvp]
Bonjour.

essaie de cette façon, par exemple
If Me.OuiNon Then
Me.Texte1.ForeColor = RGB(255, 0, 0)
Else
Me.Texte1.ForeColor = RGB(0, 0, 255)
End If

If Me.Champ > 49 Then
Me.Texte1.ForeColor = RGB(255, 0, 0)
Else
Me.Texte1.ForeColor = RGB(0, 0, 255)
End If

--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


a écrit dans le message de news:
0d5601c4d918$131767c0$
merci mais pas de succès pour moi ?
j'ai essayé avec .Value, idem, et en définissant les
champs et les couleurs aussi (as lng) mais rien à faire !!!
doit y avoir un petit truc