Discussion :

[sorinexp]

pour réaliser plus de 5 formats conditionnels VBA sur une zone texte ou numérique
quelle est la syntaxe exacte?
j'en suis resté à :

Code :

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

1
2
3
4
Me. NomZoneBackColor= 4227702
If. Me. NomZone = 5 then
Me. BackColor = 255
etc

[Tofalu]

Un select cas par exemple

Code :

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

1
2
3
4
5
6
7
8
9
With mazonedetexte
Select case .Value
 case "A" : .backcolor=vbblue
 case "B" : .backcolor=ybred
 case "C" : .backcolor=vbgreen
 case "D" : .backcolor=vbblack
 case "E" : .backcolor=vbwhite
end select
end with

[sorinexp]

Un select cas par exemple

Code :

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

1
2
3
4
5
6
7
8
9
With mazonedetexte
Select case .Value
 case "A" : .backcolor=vbblue
 case "B" : .backcolor=ybred
 case "C" : .backcolor=vbgreen
 case "D" : .backcolor=vbblack
 case "E" : .backcolor=vbwhite
end select
end with

ok ça marche pour un ou 2
seulement j'ai 15 contrôles qui doivent varier ainsi
puis regrouoer sous une seule commande évènementielle
en citant les 15 contrôles sous :
Private sub (contrôle 1 contrôle2 etc .....)
là j'ai refait le même code pour chacuns de contrôles
et la moitié on ne sait pourquoi cessent de se lmodifier en cconditionnel
ambiguité ???
en tout cas merci c'est un pas