Changer la couleur de fond d'un label

Question

Bonjour  a toutes et tous, Forum bonjour

Configuration: Windows 7 / Excel 2007

Voila j'ai un UserForm1 avec des Labels de (1 à 168) tous sont réunis dans le Frame7.
PS: Les Labels sont disposés en 12 colonnes avec 14 Labels par colonnes. 

Je souhaiterai svp en vba pouvoir changer la couleur de fond d'un où plusieurs de ces Labels.
PS: Un click mettrai le Label choisi en Rouge (VbRed) 

(1) Soit au survol de la souris 
(2) Soit sur un click Droit ou gauche de la souris

je ne vois pas comment faire ce code et si cela est possible

Je vous remercie d'avance pour votre temps  ainsi que de votre aide
Bonne journée a vous tous

Cordialement

Elphealer · Answer

Je ne vois pas comment faire ça, sans coder pour chaque Label le code associé à l'action qui fait changer de couleur.
Mais avec 12x14 Labels ça va être long à faire -.-

Kommu · Answer

Si c'est du css essaye :


label:hover { .... } 
Label:focus { .... } 


Tu as essayer cela ? c'est juste une proposition, je n'est jamais fait ça sur des labels ;)

Mike-31 · Answer

Salut,

Exemple pour le Label2 sur un clic il passera en rouge et double clic redevient bleu

Private Sub Label2_Click()
Label2.BackColor = &HFF&
End Sub

Private Sub Label2_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
Label2.BackColor = 16711680
End Sub

dudulleray · Answer

Bonjour Mike, bonjour Forum

Merci pour ta reponse et pour le petit code, ca marche bien pour un Label, mais j'en ai 168 a faire
c'est pour ça que j'avais penser au survol de la souris, je ne sais pas faire, je vais chercher au cas ou je trouverai un code 
mon fichier a un module de classe, peut etre une solution aussi

Merci beaucoup pour ton aide, je cherche un coach, comme VBA j'apprends tout seul, ça te dit ihihihi

Bon W-end a toi Mike

Cordialement    Ray

Mike-31 · Answer

Re, 
même au passage de la souris, il faudra faire une multitude de petist codes et tu n'es pas sorti de l'auberge. je regarde comment faire avec des bouclages mais ce n'est pas gagné 
A+ 
Mike-31 

Une période d'échec est un moment rêvé pour semer les graines du savoir.

dudulleray · Answer

Salut Mike

Merci pour ta réponse, je peux te  joindre le programme que j'ai modifier en me servant du module de classe existant.

un code très court en début de "initialise USF" et pour la gestion souris dans le "module de classe", c'est commenté

j'ai réussi grace a un exemple très simple se rapprochant de ce que je voulais
faire (faute de ne savoir et de pouvoir faire autrement).

Donc la je clic dans un Checkbox, la date "prélèvement" s'affiche, et fond du label(Mois) en gris, jusque la rien de changer.

le but étant d'avoir tout les mois en gris a la fin de l'année, sauf pour cette année bien sur.

et donc avec la souris un clic gauche sur le label choisi le passe en gris
et un clic droit le repasse en bleu si besoin ou (erreur)

tout a l'air de bien fonctionner et tout se sauvegarde bien

SAUF pour la couleur des labels sur lesquels j'ai cliquer.

j'y suis depuis un moment, j'ai trouver de la doc sur le net.
j'ai essayer de comprendre mais bon on ne peut pas etre bon partout LOL

je ne vois pas comment faire pour ça surement pas très difficile, moi je ne 
pige pas, je suis désolé et bien triste.

je retourne voir si un exemple traine sur le net, pour m'etre en application la sauvegarde de la couleur des labels que j'ai cliquer.

En tout cas je te remercie pour le coup de main

a plus tard si tu veux bien

Bonne fin d'après midi a toi    Ray

Mike-31 · Answer

Re,

Oui bien sur tu peux me poster ton fichier bien que je manque de temps en cette période.
Je ferais mon possible

Changer la couleur de fond d'un label

7 réponses

Discussions similaires

Newsletters