OVH Cloud OVH Cloud

Mise en forme conditionnelle

8 réponses
Avatar
Monkeytoo
Désolé mais j'ai perdu mon message et je ne sais pas si qq'un a répondu

La mise en forme conditionnelle peut-elle être gérée via code vba?
puisque par le menu, il n'est possible que d'utiliser 3 conditions

8 réponses

Avatar
Raymond [mvp]
depuis ce matin 7h

Bonjour.

bien sûr en utilisant une séquence de If ou un select case selon le nombre
de conditions.
tu trouveras un exemple sur :
http://access.seneque.free.fr/couleurs_condition.htm pour un état mais c'est
identique pour un formulaire.
il faudra mettre ta procédure dans l'événement Form_Current et dans
l'événement AfterUpdate du contrôle qui peut déclencher un changement de
couleur.

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


"Monkeytoo" a écrit dans le message de
news:
Désolé mais j'ai perdu mon message et je ne sais pas si qq'un a répondu

La mise en forme conditionnelle peut-elle être gérée via code vba?
puisque par le menu, il n'est possible que d'utiliser 3 conditions





Avatar
Monkeytoo
ça fonctionne pour un formulaire en mode continu???
"Raymond [mvp]" a écrit dans le message de
news: #
depuis ce matin 7h

Bonjour.

bien sûr en utilisant une séquence de If ou un select case selon le nombre
de conditions.
tu trouveras un exemple sur :
http://access.seneque.free.fr/couleurs_condition.htm pour un état mais
c'est

identique pour un formulaire.
il faudra mettre ta procédure dans l'événement Form_Current et dans
l'événement AfterUpdate du contrôle qui peut déclencher un changement de
couleur.

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


"Monkeytoo" a écrit dans le message de
news:
Désolé mais j'ai perdu mon message et je ne sais pas si qq'un a répondu

La mise en forme conditionnelle peut-elle être gérée via code vba?
puisque par le menu, il n'est possible que d'utiliser 3 conditions









Avatar
Raymond [mvp]
ça fonctionne pour les contrôles dépendants seulement.

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


"Monkeytoo" a écrit dans le message de
news:
ça fonctionne pour un formulaire en mode continu???


Avatar
Monkeytoo
je ne trouve pas l'évènement sur formattage dans un formulaire
normal ?
"Raymond [mvp]" a écrit dans le message de
news:
ça fonctionne pour les contrôles dépendants seulement.

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


"Monkeytoo" a écrit dans le message de
news:
ça fonctionne pour un formulaire en mode continu???






Avatar
Raymond [mvp]
Comme je te l'indiquais sur l'autre post:
il faudra mettre ta procédure dans l'événement Form_Current et dans
l'événement AfterUpdate du contrôle qui peut déclencher un changement de
couleur.
(formatage c'est pour les états)
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"Monkeytoo" a écrit dans le message de
news:
je ne trouve pas l'évènement sur formattage dans un formulaire
normal ?


Avatar
Monkeytoo
oui mais dans ce cas le champs de tous les records prennent la mise en forme
de la condition
exemple de code

Private Sub Form_Current()
If Month(E_Date_Evenement) = 10 Then
E_Date_Evenement.BackColor = vbRed
Else
E_Date_Evenement.BackColor = vbBlue
End If
End Sub

à l'ouverture du form, le champs e_date_evenement a une couleur de fond
bleue
par contre si je clique dans un enreg dont le mois est 10 , la couleur de la
date de TOUS les enreg passe au rouge
je n'ai donc pas comme dans un état des lignes avec des couleurs
différentes selon le critère
alors que si je mets la condition via le menu "Mise en forme
conditionnelle", cela fonctionne


"Raymond [mvp]" a écrit dans le message de
news:
Comme je te l'indiquais sur l'autre post:
il faudra mettre ta procédure dans l'événement Form_Current et dans
l'événement AfterUpdate du contrôle qui peut déclencher un changement de
couleur.
(formatage c'est pour les états)
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"Monkeytoo" a écrit dans le message de
news:
je ne trouve pas l'évènement sur formattage dans un formulaire
normal ?






Avatar
Raymond [mvp]
C'est le problème des formulaires en continu.
sinon tu as une solution (pas si simple) dans les pages:
http://mypage.bluewin.ch/w.stucki/Formulaires.htm#Couleurs
http://www.mvps.org/accessfr/forms/frm0024.htm
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"Monkeytoo" a écrit dans le message de
news:%
oui mais dans ce cas le champs de tous les records prennent la mise en
forme

de la condition
exemple de code

Private Sub Form_Current()
If Month(E_Date_Evenement) = 10 Then
E_Date_Evenement.BackColor = vbRed
Else
E_Date_Evenement.BackColor = vbBlue
End If
End Sub

à l'ouverture du form, le champs e_date_evenement a une couleur de fond
bleue
par contre si je clique dans un enreg dont le mois est 10 , la couleur de
la

date de TOUS les enreg passe au rouge
je n'ai donc pas comme dans un état des lignes avec des couleurs
différentes selon le critère
alors que si je mets la condition via le menu "Mise en forme
conditionnelle", cela fonctionne


Avatar
Monkeytoo
j'ai déjà utilisé cette méthode en access 97
mais vu que dans la version 2000, la MEFC (mise en forme conditionnelle)
était prévue dans un formulaire en mode continu, je pensais qu'elle pouvait
être gérée via code vba

"Raymond [mvp]" a écrit dans le message de
news:
C'est le problème des formulaires en continu.
sinon tu as une solution (pas si simple) dans les pages:
http://mypage.bluewin.ch/w.stucki/Formulaires.htm#Couleurs
http://www.mvps.org/accessfr/forms/frm0024.htm
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"Monkeytoo" a écrit dans le message de
news:%
oui mais dans ce cas le champs de tous les records prennent la mise en
forme

de la condition
exemple de code

Private Sub Form_Current()
If Month(E_Date_Evenement) = 10 Then
E_Date_Evenement.BackColor = vbRed
Else
E_Date_Evenement.BackColor = vbBlue
End If
End Sub

à l'ouverture du form, le champs e_date_evenement a une couleur de fond
bleue
par contre si je clique dans un enreg dont le mois est 10 , la couleur
de


la
date de TOUS les enreg passe au rouge
je n'ai donc pas comme dans un état des lignes avec des couleurs
différentes selon le critère
alors que si je mets la condition via le menu "Mise en forme
conditionnelle", cela fonctionne