OVH Cloud OVH Cloud

Contrôles sur userform

7 réponses
Avatar
Caroline L.
Bonjour !

Deux Petites questions concernant des contrôles dans un userform.

1- J'ai une dizaine de contrôles dans un userform pour faciliter la
saisie de données. Les contrôles sont fond blanc mais j'aimerais que le
contrôle "actif" change de couleur (donc lorsque je clique dans la case pour
saisir mes données, cette case passe de fond blanc à fond orange).

2- Comment ajuster les propriétés pour que les cases à cocher se coche
avec la clavier (avec un Enter par exemple) ? Donc avec le TabIndex j'ai
défini l'ordre mais lorsque le focus est sur la case à cocher, comment faire
pour cocher sans la souris ?


Merci beaucoup

Caroline

7 réponses

Avatar
Pierre Fauconnier
Bonjour

1. Gère l'évènement ENTER du contrôle et modifie la propriété BackColor

Private Sub TextBox1_Enter()
TextBox1.BackColor = RGB(100, 200, 150)
End Sub


2. Lorsque la case a le focus, la barre d'espacement alterne la valeur de la
case à cocher ( Ergonomie Windows valable à peu près partout )

Ok?


--
Pierre Fauconnier ()
"Le bonheur n'est pas au bout du chemin. Le bonheur EST le chemin ( proverbe
zen )
Remplacez nospam.nospam par pfi.be pour répondre. Merci

"Caroline L." a écrit dans le message de news:

Bonjour !

Deux Petites questions concernant des contrôles dans un userform.

1- J'ai une dizaine de contrôles dans un userform pour faciliter la
saisie de données. Les contrôles sont fond blanc mais j'aimerais que le
contrôle "actif" change de couleur (donc lorsque je clique dans la case
pour
saisir mes données, cette case passe de fond blanc à fond orange).

2- Comment ajuster les propriétés pour que les cases à cocher se coche
avec la clavier (avec un Enter par exemple) ? Donc avec le TabIndex j'ai
défini l'ordre mais lorsque le focus est sur la case à cocher, comment
faire
pour cocher sans la souris ?


Merci beaucoup

Caroline




Avatar
Pierre Fauconnier
Et ne pas oublier de gérer également l'évènement EXIT

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
TextBox1.BackColor = vbWhite
End Sub

Attention. Si tu modifies aussi la couleur de fond des cases à cocher, ce
n'est pas le carré blanc qui prend la couleur , mais la zone du contrôle.
Lorsque tu quittes ce contrôle, il ne faut pas mettre la valeur de backcolor
à vbwhite ( sauf si le fond du userform est blanc ) mais à
&H8000000F( C'est généralement cette couleur qui est utilisée pour le fond
du userform par défaut...)

Ok?


"Caroline L." a écrit dans le message de news:

Bonjour !

Deux Petites questions concernant des contrôles dans un userform.

1- J'ai une dizaine de contrôles dans un userform pour faciliter la
saisie de données. Les contrôles sont fond blanc mais j'aimerais que le
contrôle "actif" change de couleur (donc lorsque je clique dans la case
pour
saisir mes données, cette case passe de fond blanc à fond orange).

2- Comment ajuster les propriétés pour que les cases à cocher se coche
avec la clavier (avec un Enter par exemple) ? Donc avec le TabIndex j'ai
défini l'ordre mais lorsque le focus est sur la case à cocher, comment
faire
pour cocher sans la souris ?


Merci beaucoup

Caroline




Avatar
Caroline L.
Bonjour Pierre,

Si c'est Ok ? Bien sûr que oui, tu fais mon bonheur ! Tu fonctionnes.
Deux petites choses :
1- comment as-tu trouvé ton code de couleur RGB(100, 200, 150) ?
J'essaie de voir dans les propriétés pour changer la couleur mais je les
propriétés ne s'affichent pas.

2- pour les cases à cocher sans correct pour l'événement EXIT mais lorsque
le contrôle est actif, le carré de la case à cocher ne se colore pas c'est
seulement le contour. As-tu une idée comment faire pour avoir le fond (le
petit carré) en couleur ?

--------------------------------------------------

P.S. ça fonctionne la barre d'espace pour sélectionner une case à cocher.


Merci beaucoup Pierre !

Caroline



"Pierre Fauconnier" a écrit dans le
message de news: #
Et ne pas oublier de gérer également l'évènement EXIT

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
TextBox1.BackColor = vbWhite
End Sub

Attention. Si tu modifies aussi la couleur de fond des cases à cocher, ce
n'est pas le carré blanc qui prend la couleur , mais la zone du contrôle.
Lorsque tu quittes ce contrôle, il ne faut pas mettre la valeur de
backcolor

à vbwhite ( sauf si le fond du userform est blanc ) mais à
&H8000000F( C'est généralement cette couleur qui est utilisée pour le fond
du userform par défaut...)

Ok?


"Caroline L." a écrit dans le message de news:

Bonjour !

Deux Petites questions concernant des contrôles dans un userform.

1- J'ai une dizaine de contrôles dans un userform pour faciliter la
saisie de données. Les contrôles sont fond blanc mais j'aimerais que le
contrôle "actif" change de couleur (donc lorsque je clique dans la case
pour
saisir mes données, cette case passe de fond blanc à fond orange).

2- Comment ajuster les propriétés pour que les cases à cocher se
coche


avec la clavier (avec un Enter par exemple) ? Donc avec le TabIndex
j'ai


défini l'ordre mais lorsque le focus est sur la case à cocher, comment
faire
pour cocher sans la souris ?


Merci beaucoup

Caroline








Avatar
Pierre Fauconnier
Bonjour Caroline,

Pour la couleur, c'est une couleur que j'avais trouvée un jour et je me suis
servi de ce code. RGB signifie Red, Green, Blue, et tu composes toi-même ta
couleur en donnant un poids à chaque couleur de base, dan l'ordre RGB. Le
poids peut être spécifé avec une valeur entière comprise entre 0 et 255.

Tu peux utiliser des valeurs entières, soit avec les constantes de couleur
( vbred, vbgreen, ...) mais je les trouve assez moches.

Je pense qu'il n'est pas possible de colore le carré de la case à cocher.
Peut-être y-a-t'il moyen avec une API, mais je ne connais pas.

Ravi d'avoir aidé...


--
Pierre Fauconnier ()
"Le bonheur n'est pas au bout du chemin. Le bonheur EST le chemin ( proverbe
zen )
Remplacez nospam.nospam par pfi.be pour répondre. Merci


"Caroline L." a écrit dans le message de news:
O%
Bonjour Pierre,

Si c'est Ok ? Bien sûr que oui, tu fais mon bonheur ! Tu fonctionnes.
Deux petites choses :
1- comment as-tu trouvé ton code de couleur RGB(100, 200, 150) ?
J'essaie de voir dans les propriétés pour changer la couleur mais je les
propriétés ne s'affichent pas.

2- pour les cases à cocher sans correct pour l'événement EXIT mais lorsque
le contrôle est actif, le carré de la case à cocher ne se colore pas c'est
seulement le contour. As-tu une idée comment faire pour avoir le fond (le
petit carré) en couleur ?

--------------------------------------------------

P.S. ça fonctionne la barre d'espace pour sélectionner une case à cocher.


Merci beaucoup Pierre !

Caroline



"Pierre Fauconnier" a écrit dans le
message de news: #
Et ne pas oublier de gérer également l'évènement EXIT

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
TextBox1.BackColor = vbWhite
End Sub

Attention. Si tu modifies aussi la couleur de fond des cases à cocher, ce
n'est pas le carré blanc qui prend la couleur , mais la zone du contrôle.
Lorsque tu quittes ce contrôle, il ne faut pas mettre la valeur de
backcolor

à vbwhite ( sauf si le fond du userform est blanc ) mais à
&H8000000F( C'est généralement cette couleur qui est utilisée pour le
fond
du userform par défaut...)

Ok?


"Caroline L." a écrit dans le message de news:

Bonjour !

Deux Petites questions concernant des contrôles dans un userform.

1- J'ai une dizaine de contrôles dans un userform pour faciliter la
saisie de données. Les contrôles sont fond blanc mais j'aimerais que le
contrôle "actif" change de couleur (donc lorsque je clique dans la case
pour
saisir mes données, cette case passe de fond blanc à fond orange).

2- Comment ajuster les propriétés pour que les cases à cocher se
coche


avec la clavier (avec un Enter par exemple) ? Donc avec le TabIndex
j'ai


défini l'ordre mais lorsque le focus est sur la case à cocher, comment
faire
pour cocher sans la souris ?


Merci beaucoup

Caroline












Avatar
Caroline L.
Re-bonjour Pierre,

merci pour les explication du RGB... très pratique.

merci pour tout !

Caroline



"Pierre Fauconnier" a écrit dans le
message de news:
Bonjour Caroline,

Pour la couleur, c'est une couleur que j'avais trouvée un jour et je me
suis

servi de ce code. RGB signifie Red, Green, Blue, et tu composes toi-même
ta

couleur en donnant un poids à chaque couleur de base, dan l'ordre RGB. Le
poids peut être spécifé avec une valeur entière comprise entre 0 et 255.

Tu peux utiliser des valeurs entières, soit avec les constantes de couleur
( vbred, vbgreen, ...) mais je les trouve assez moches.

Je pense qu'il n'est pas possible de colore le carré de la case à cocher.
Peut-être y-a-t'il moyen avec une API, mais je ne connais pas.

Ravi d'avoir aidé...


--
Pierre Fauconnier ()
"Le bonheur n'est pas au bout du chemin. Le bonheur EST le chemin (
proverbe

zen )
Remplacez nospam.nospam par pfi.be pour répondre. Merci


"Caroline L." a écrit dans le message de news:
O%
Bonjour Pierre,

Si c'est Ok ? Bien sûr que oui, tu fais mon bonheur ! Tu fonctionnes.
Deux petites choses :
1- comment as-tu trouvé ton code de couleur RGB(100, 200, 150) ?
J'essaie de voir dans les propriétés pour changer la couleur mais je les
propriétés ne s'affichent pas.

2- pour les cases à cocher sans correct pour l'événement EXIT mais
lorsque


le contrôle est actif, le carré de la case à cocher ne se colore pas
c'est


seulement le contour. As-tu une idée comment faire pour avoir le fond
(le


petit carré) en couleur ?

--------------------------------------------------

P.S. ça fonctionne la barre d'espace pour sélectionner une case à
cocher.




Merci beaucoup Pierre !

Caroline



"Pierre Fauconnier" a écrit dans le
message de news: #
Et ne pas oublier de gérer également l'évènement EXIT

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
TextBox1.BackColor = vbWhite
End Sub

Attention. Si tu modifies aussi la couleur de fond des cases à cocher,
ce



n'est pas le carré blanc qui prend la couleur , mais la zone du
contrôle.



Lorsque tu quittes ce contrôle, il ne faut pas mettre la valeur de
backcolor

à vbwhite ( sauf si le fond du userform est blanc ) mais à
&H8000000F( C'est généralement cette couleur qui est utilisée pour le
fond
du userform par défaut...)

Ok?


"Caroline L." a écrit dans le message de news:

Bonjour !

Deux Petites questions concernant des contrôles dans un userform.

1- J'ai une dizaine de contrôles dans un userform pour faciliter
la




saisie de données. Les contrôles sont fond blanc mais j'aimerais que
le




contrôle "actif" change de couleur (donc lorsque je clique dans la
case




pour
saisir mes données, cette case passe de fond blanc à fond orange).

2- Comment ajuster les propriétés pour que les cases à cocher se
coche


avec la clavier (avec un Enter par exemple) ? Donc avec le TabIndex
j'ai


défini l'ordre mais lorsque le focus est sur la case à cocher,
comment




faire
pour cocher sans la souris ?


Merci beaucoup

Caroline
















Avatar
Jacquouille
Bonjour Caroline
En complément de Pierre, tu trouveras sur Excelabo (voir signature) au
département peinture et couleurs, un fichier de mon ami Modeste, qui, sans
être Belge, n'en est pas moins compétent.
Ce fichier te compose les trois pourcentages (la formule magique du RGB.
http://www.excelabo.net/moteurs/recherche.php voir JT Color.
Je profite de cette occasion pour signaler que ce fichier m'a été attribué
alors que c'est Modeste dit GeeDee qui en est l'auteur. Les tests de
paternités sont positifs.
Je demande donc à la Conservatrice du musée MPFE de rectifier le tir.
Bonne chance
--
Bien amicalmement,
Vivement conseillés:
http://www.excelabo.net
http://jacxl.free.fr/mpfe/trombino.html
http://dj.joss.free.fr/netiquet.htm
Jacquouille.

"Caroline L." a écrit dans le message de news:
e$
Re-bonjour Pierre,

merci pour les explication du RGB... très pratique.

merci pour tout !

Caroline



"Pierre Fauconnier" a écrit dans le
message de news:
Bonjour Caroline,

Pour la couleur, c'est une couleur que j'avais trouvée un jour et je me
suis

servi de ce code. RGB signifie Red, Green, Blue, et tu composes toi-même
ta

couleur en donnant un poids à chaque couleur de base, dan l'ordre RGB. Le
poids peut être spécifé avec une valeur entière comprise entre 0 et 255.

Tu peux utiliser des valeurs entières, soit avec les constantes de
couleur
( vbred, vbgreen, ...) mais je les trouve assez moches.

Je pense qu'il n'est pas possible de colore le carré de la case à cocher.
Peut-être y-a-t'il moyen avec une API, mais je ne connais pas.

Ravi d'avoir aidé...


--
Pierre Fauconnier ()
"Le bonheur n'est pas au bout du chemin. Le bonheur EST le chemin (
proverbe

zen )
Remplacez nospam.nospam par pfi.be pour répondre. Merci


"Caroline L." a écrit dans le message de news:
O%
Bonjour Pierre,

Si c'est Ok ? Bien sûr que oui, tu fais mon bonheur ! Tu fonctionnes.
Deux petites choses :
1- comment as-tu trouvé ton code de couleur RGB(100, 200, 150) ?
J'essaie de voir dans les propriétés pour changer la couleur mais je
les
propriétés ne s'affichent pas.

2- pour les cases à cocher sans correct pour l'événement EXIT mais
lorsque


le contrôle est actif, le carré de la case à cocher ne se colore pas
c'est


seulement le contour. As-tu une idée comment faire pour avoir le fond
(le


petit carré) en couleur ?

--------------------------------------------------

P.S. ça fonctionne la barre d'espace pour sélectionner une case à
cocher.




Merci beaucoup Pierre !

Caroline



"Pierre Fauconnier" a écrit dans le
message de news: #
Et ne pas oublier de gérer également l'évènement EXIT

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
TextBox1.BackColor = vbWhite
End Sub

Attention. Si tu modifies aussi la couleur de fond des cases à cocher,
ce



n'est pas le carré blanc qui prend la couleur , mais la zone du
contrôle.



Lorsque tu quittes ce contrôle, il ne faut pas mettre la valeur de
backcolor

à vbwhite ( sauf si le fond du userform est blanc ) mais à
&H8000000F( C'est généralement cette couleur qui est utilisée pour le
fond
du userform par défaut...)

Ok?


"Caroline L." a écrit dans le message de news:

Bonjour !

Deux Petites questions concernant des contrôles dans un userform.

1- J'ai une dizaine de contrôles dans un userform pour faciliter
la




saisie de données. Les contrôles sont fond blanc mais j'aimerais que
le




contrôle "actif" change de couleur (donc lorsque je clique dans la
case




pour
saisir mes données, cette case passe de fond blanc à fond orange).

2- Comment ajuster les propriétés pour que les cases à cocher se
coche


avec la clavier (avec un Enter par exemple) ? Donc avec le TabIndex
j'ai


défini l'ordre mais lorsque le focus est sur la case à cocher,
comment




faire
pour cocher sans la souris ?


Merci beaucoup

Caroline




















Avatar
Misange
la conservatrice des pigments et solvants prend bien note de
l'attribution erronnée de paternité mais si toutefois le sieur modeste
en est d'accord, elle ne souhaite pas faire la correction, tant ton
prosélytisme à l'égard de ce classeur est grand :-)
tout au moins, ajouterais-je les initiales du modeste et tant mieux si
ça vous fait rougir tous les deux, pour un classeur consacré aux
couleurs ce n'est que chose bien normale somme toutes.

Misange migrateuse http://www.excelabo.net
mail : http://cerbermail.com/?k5Q8Dh2mta

Le 21/05/2005 09:51, :
Bonjour Caroline
En complément de Pierre, tu trouveras sur Excelabo (voir signature) au
département peinture et couleurs, un fichier de mon ami Modeste, qui, sans
être Belge, n'en est pas moins compétent.
Ce fichier te compose les trois pourcentages (la formule magique du RGB.
http://www.excelabo.net/moteurs/recherche.php voir JT Color.
Je profite de cette occasion pour signaler que ce fichier m'a été attribué
alors que c'est Modeste dit GeeDee qui en est l'auteur. Les tests de
paternités sont positifs.
Je demande donc à la Conservatrice du musée MPFE de rectifier le tir.
Bonne chance