OVH Cloud OVH Cloud

[ETAT] 1 ligne sur 2 colorisé

1 réponse
Avatar
kato
Dans un état, je souhaite coloriser une ligne sur deux.
J'ai trouvé un code mais qui fonctionne seulement sur le DETAIL.
Alors que j'ai besoin del'utiliser dans une autre partie appelé
"PiedGroupe5".

Code que j'ai trouvé :

Private Sub Détail_Print(Cancel As Integer, PrintCount As Integer)
If ([NoLigne] Mod 2) = 0 Then
Section(0).BackColor = vbWhite
Else
Section(0).BackColor = 13434879
End If
End Sub

quelqu'un aurait une idée ?

1 réponse

Avatar
Eric
Bonjour,

Sans garantie ...
Avec quelque chose comme :
Private Sub PiedGroupe1_Print(Cancel As Integer, PrintCount As Integer)
If ([NoLigne] Mod 2) = 0 Then
Section(acGroupLevel1Footer).BackColor = vbWhite
Else
Section(acGroupLevel1Footer).BackColor = 13434879
End If
End Sub

Pour d'autres niveaux, regardes dans l'aide sur la propriété Section.

Dans un état, je souhaite coloriser une ligne sur deux.
J'ai trouvé un code mais qui fonctionne seulement sur le DETAIL.
Alors que j'ai besoin del'utiliser dans une autre partie appelé
"PiedGroupe5".

Code que j'ai trouvé :

Private Sub Détail_Print(Cancel As Integer, PrintCount As Integer)
If ([NoLigne] Mod 2) = 0 Then
Section(0).BackColor = vbWhite
Else
Section(0).BackColor = 13434879
End If
End Sub

quelqu'un aurait une idée ?




--
A+
Eric
http://www.mpfa.info/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr