Créer un voyant bi-color (rouge/vert)

Résolu
Signaler
Messages postés
5
Date d'inscription
lundi 17 novembre 2008
Statut
Membre
Dernière intervention
3 décembre 2008
-
Messages postés
7393
Date d'inscription
mercredi 23 avril 2003
Statut
Membre
Dernière intervention
6 avril 2012
-
Bonsoir,
Je souhaite creer differents voyants dans mon UserForm.Pour ce faire je souhaite utiliser la commande backcolor d'une zone texte et la piloter avec un bouton de commande (rouge/vert pour marche arret).
Comment faire? (la syntaxe)
Merci d'avance.

7 réponses

Messages postés
7393
Date d'inscription
mercredi 23 avril 2003
Statut
Membre
Dernière intervention
6 avril 2012
58
Salut,

Essaie peu etre.
1- Bouton Appelé Command1
2-Une TextBox appelé Text1

Private Sub Command1_Click()
Static BVal As Boolean
   Text1.BackColor = IIf(BVal, vbGreen, vbRed)
   BVal = Not BVal
End Sub<hr />, ----
[../code.aspx?ID=41455 By Renfield]
PS: qui dit "UserForm" dit VBA.penses donc à poster dans la section adéquate la prochaine fois.

@+: Ju£i€n
Pensez: Réponse acceptée
Messages postés
13280
Date d'inscription
lundi 13 décembre 2004
Statut
Modérateur
Dernière intervention
3 février 2018
47
salut,

au click
text1.backcolor= iif(text1.backcolor=vbred,vbgreen, vbred)

ps : "userform", donc topic déplacé de VB6 vers VBA !

<hr size ="2" width="100%" />
Prenez un instant pour répondre à [sujet-SONDAGE-POP3-POUR-CS_769706.aspx ce sondage] svp 
Messages postés
13280
Date d'inscription
lundi 13 décembre 2004
Statut
Modérateur
Dernière intervention
3 février 2018
47
à peu de choses près Julien (hi) ^^
Messages postés
7393
Date d'inscription
mercredi 23 avril 2003
Statut
Membre
Dernière intervention
6 avril 2012
58
Re,
Yep, les grands esprits se rencontrent

@+: Ju£i€n
Pensez: Réponse acceptée
Messages postés
5
Date d'inscription
lundi 17 novembre 2008
Statut
Membre
Dernière intervention
3 décembre 2008

Merci ,


Je vais essayer vos propositions.


Je vous tiendrais au courant
A+
Messages postés
5
Date d'inscription
lundi 17 novembre 2008
Statut
Membre
Dernière intervention
3 décembre 2008

Merci beaucoup,


Ca à marché du premier coup.


Merci encore
A+
Messages postés
7393
Date d'inscription
mercredi 23 avril 2003
Statut
Membre
Dernière intervention
6 avril 2012
58
Salut,
Y a pas de quoi,
Mais le plus important, en outre le fait que cela fonctionne, c'est qu'il faut que tu aies compris le code.

@+: Ju£i€n
Pensez: Réponse acceptée