Changer la couleur Txt du contenu d'un champ en VBA [Résolu]

[Lorenzole+bo]

Bonjour,
Je voudrais qu'à l'ouverture d'un formulaire, une condition s'applique :

Si contenu PeriodeE <> contenu PeriodeRef alors contenu PeriodeRef = Texte rouge

Dans le cas ci-dessous le condition ne s'applique pas :

Code :

1
2
3
4
5
6
7
Private Sub Form_Current()
With CodeContextObject
If (Forms!VerifPeriode!PeriodeRef <> Forms!VerifPeriode!PeriodeE) Then
Forms!VerifPeriode!PeriodeE = Forms!VerifPeriode!PeriodeE.ForeColor = .vbRed
End If
End With
End Sub

La méthode est-elle correcte ? (Ce code est généré par la méthode Macro - Convertir Macro en Visual Basic) Comment appliquer une telle condition?

Merci d'avance.
Lorenzo

[Renardo]

Tu es en formulaire continus ou formulaire unique ?

[Lorenzole+bo]

Je suis en formulaire continu créé à partir d'une requête.

[Renardo]

Si tu es en formulaire continu utilise plutot la mise en forme conditionnelle

[Lorenzole+bo]

Ok pour la mise en forme conditionnelle :

valeur <> [Champ]

Merci beaucoup!