Label

Fermé
cat_45 - 25 juil. 2017 à 10:38
Patrice33740 Messages postés 8556 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 2 mars 2023 - 25 juil. 2017 à 14:41
Bonjour,

je suis récemment sur vba et j'ai une question.

je voudrais faire un boucle sur des label.

par exemple 10 label de 1 à 10.
je voudrais que cest label soit positionné exactement sur une case de la feuille

par exemple je clique sur un bouton et la ca me crée un label 1 en case A1 , je reclique label 2 case A2 etcc.

et que lorsque je passe la souris sur les labels, un userform s'affiche (userfrom que jai deja créer).


j'ai déjà ça:
Private Sub Label5_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
Userform_Image.Show
End Sub

cela marche que pour le label 5 lorsque je passe ma souris dessus le userform s'ouvre.


quelqu'un pourrait m'aider s'il vous plaît??
je vous remercie d'avance
A voir également:

2 réponses

Patrice33740 Messages postés 8556 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 2 mars 2023 1 778
25 juil. 2017 à 13:38
Bonjour,

Il faut que tu crée un module de classe pour gérer l'évènement MouseMove des labels.
Les bases ici :
https://www.commentcamarche.net/faq/10397-vba-et-les-collections-d-objets
https://www.commentcamarche.net/faq/18452-vba-collections-de-classes-et-collections-d-objets
0
D'accord je te remercie patrice
je viens de créer le module de classe ...

mais après je n'en sais pas plus .. je ne sais toujours pas faire ce que j'ai expliqué précédemment ...
0
Patrice33740 Messages postés 8556 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 2 mars 2023 1 778
25 juil. 2017 à 14:41
Étant donné que le but est d'afficher l'Usf, commence par mettre en place le module de classe, quand tu aura réussi, le reste te semblera un jeu d'enfant !
0