Access forecolor dans un etat Fermé

Question

Bonjour, 

La fonction forecolor ne fonctionne pas dans un etat : quel fonction doit on utiliser donc por faire un changement de couleur dans un etat ?

Cordialement

Configuration: Windows XP / Firefox 17.0

f894009 · Answer

Bonjour,

Si ca marche:

un exemple

https://www.developpez.net/forums/d1412256/logiciels/microsoft-office/access/vba-access/faire-varier-couleur-d-champ-d-etat-selon-contenu/



un code que j'utilise

Private Sub Détail_Format(Cancel As Integer, FormatCount As Integer)      Me![réf-courrier].ForeColor = Me![Couleur]      Me![Arrivé].ForeColor = Me![Couleur]      Me![Envoi Courrier].ForeColor = Me![Couleur]      Me![Lien-hypertexte].ForeColor = Me![Couleur]      Me![Motif].ForeColor = Me![Couleur]      Me![Nom].ForeColor = Me![Couleur]      Me![Réponse].ForeColor = Me![Couleur]      Me![Couleur].ForeColor = Me![Couleur]      'Me![réf-courrier].ForeColor = Me![Couleur]End Sub

junglekite · Answer

Cela marche bien dans mon formulaire mais pas dans le report : J'ai un message d'erreur sur forecolor...


Private Sub Détail_Format(Cancel As Integer, FormatCount As Integer)

Dim longAge As Long

If IsNull(Me.[Date membre]) = False Then

   longAge = DateDiff("d", Me.[Date membre], Now, vbSaturday, vbFirstJan1)
    Select Case longAge
        Case Is > 365
          Me.[Date membre].ForeColor = RGB(255, 0, 0)
          Case Is < 365
            Me.[Date membre].ForeColor = RGB(0, 0, 0)
  
   End Select
End If
End Sub

f894009 · Answer

Bonjour,

un exemple de fichier access:

https://www.cjoint.com/?DFghEXC6dGg

Access forecolor dans un etat

3 réponses

Discussions similaires