Discussion :

[léti07]

bonjour à tous

voila mon probleme j'aimerai arriver à faire la meme chose que la mise en forme conditionnelle mais dans vb.
c'est à dire mettre mon texte en couleur selon une autre valeur
je voudrai que mon numéro change selon son type

j'ai essayé ceci :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
Private Sub Form_Current()
If Me.Type = "cat1" Then
    Me.numero.ForeColor = vbRed
    Else
    If Me.Type = "cat2" Then
    Me.numero.ForeColor = vbBlue
    End If
End If
End Sub

ca me change bien ma couleur de texte, mais si je me met sur un numéro correspondant a la cat1 mais ca me met la meme couleur pour l'ensemble de mes données(y compris ceux des autres categorie) et pareil pour cat2

j'ai aussi essayé de le mettre aprés la mise à jour mais ca n'a rien donner

j'ai regardé dans les Faq et les tutoriels(c'est comme ca que j'ai trouvé la mise en forme conditionnelle mais j'ai plus de 3 conditions donc je ne peux pas passer par ca pourtant ca m'aurait bien arranger) mais j'ai pas trouvé ce que je voulais.

si quelqu'un a une idée car la je sais plus quoi faire.

[Domi2]

Bonjour,

Cela m'étonnerait que cela fonctionne correctement avec des If imbriqués.

Si tu as plusieurs conditions à tester, il me semble plus judicieux d'utiliser l'instruction Select Case .... End Select.

Cela sera beaucoup plus facile de tester chaque valeur de Type et d'effectuer la mise en forme correspondante.

Domi2

[@rkane]

fais plutot :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
If Me.Type = "cat1" Then
Me.numero.ForeColor = vbRed
ElseIf Me.Type = "cat2" Then
Me.numero.ForeColor = vbBlue
End If

Accessoirement... si tu es sur un form en continu, ça ne marchera pas ! Le systeme alignera les controles sur l'etat du premier enregistrement rencontre.
Tu seras oblige de passer par la mise en forme conditionnelle.

[léti07]

il n'y a pas de moyen pour faire comme la mise en forme conditionnelle dans un formulaire en mode continu???

le probleme pour la mise en forme conditionnelle c'est qu'elle me permet de faire que 3 conditions alors que j'en ai une dizaine.
si je passe sous un autre mode se serait possible??


j'ai essayé avec un case select mais ca change rien

[@rkane]

Eh oui j'ai connu ce probleme egalement.... La seule solution dans ce cas c'est d'avoir un form de consultation base sur une requete qui trie tes enregistrements comme tu le souhaites.
Et tu fais defiler tes enregistrements à la roulette ou avec les touches sauts de pages ou des boutons.
Tes mises en formes sont à placer sous Current_Form et non sur Open_Form

[léti07]

mon formulaire est deja basé sur une requete, car mon numero est dans une table et mon type dans une autre.
ca m'arrange vraiment pas si je dois remettre une condition dans ma requete sur le champs type.
car ca me fera une dizaine de requete c'est pas top pour mettre tous dans un même formulaire.

si quelqu'un a une idée pour faire apparaitre mon numéro différement selon son type, je suis preneuse.

[@rkane]

mais non tu utilises le code que je t'ai donné tout à l'heure tout simplement... tu adaptes les noms des controles et c'est tout !

[léti07]

j'ai repris ton code ca me change bien mes couleurs
mais il met la meme couleur pour tous mes numéros
c'est à dire si mon curseur est sur un numéro de cat1, tous mes numéros deviennent rouges et si il est sur un cat2 tous mes numéros sont bleus
je comprend pas ce qui cloche
pourtant je suis bien basée sur une requête

[cafeine]

Hello,

si tu es dans un formulaire en mode continu, ce n'est pas un bug.
Tu ne peux pas gérer cela en VBA, il faudra impérativement passer par la mise en forme conditionnelle.

[léti07]

bon bah tanpis
merci à tous pour votre aide

et surtout un grand merci à ft035580, je vais partir sur ton idée je pense que se sera plus simple et aussi moins prise de tete.