Discussion :

[adhyatma]

Bonjour,
Dans un formulaire Excel, j'aimerais savoir s'il est possible de changer la couleur de fond du contrôle qui reçoit le focus (quel que soit ce contrôle) afin que l'utilisateur se repère plus facilement, surtout s'il utilise le clavier. J'ai une centaine de contrôles dans mon formulaire et j'aimerais éviter de mettre un évènement 'sur réception focus' et un évènement 'sur perte focus' pour chaque contrôle.
Merci d'avance de vos suggestions.

[DeaD78]

Bonjour,

Je pense que cela pourrait te convenir :

Code :

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

UserForm1.ActiveControl.BackColor = 100

ActiveControl représente le contrôle ayant le focus comme tu le souhaites. J'lui ai mis une couleur au pif.

Pour ce que tu souhaites faire je pense à quelque chose du genre :

Code :

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

1
2
3
4
5
6
7
8
9
Dim Ctrl As Control
 
For Each Ctrl In UserForm1.Controls
    If Ctrl.Name <> ActiveControl.Name Then
        Ctrl.BackColor = 100
    Else
        ActiveControl.BackColor = 200
    End If
Next

Tu parcours tous les contrôles de ton formulaire. Si c'est le contrôle ayant le focus la couleur est 200 sinon la couleur est 100. Comme cela, dès que tu change de focus et que tu rappelles la sub, l'ancien contrôle actif va bien repasser à 100 en couleur et le nouveau passera alors à 200.

A toi d'adapter.

Bonne chance pour la suite.

PS : c'est testé, ça fonctionne. Les couleurs sont un tout petit peu exotiques dans cet exemple A toi de trouver les bonnes couleurs Il faut aussi appeler la Sub à chaque mouvement mais c'est assez simple !

[adhyatma]

Je suis pas sûr d'avoir bien compris où il faut mettre ce code, mais je vais faire des essais dès que j'ai un peu de temps. Un grand merci en tous cas, car même si je ne sais pas trop comment l'utiliser, ta réponse colle pile poil à ma préoccupation.