MouseMove

[dhiouf]

Bonjour tous le monde
j'ai creer une procédure private sub optionbutton1_MouseMove,mais pour l'affecter a 24 optionbutton il faut répéter la même procédure 24 fois(optionbutton2_MouseMove,optionbutton3_MouseMove etc...), existe il une seulle procédure MouseMove pour 24 optionbutton.
merci d'avance

 

[porcinet82]

Re : MouseMove

Salut,

Je pense qu'il est possible de passer outre le copier/coller des 24 procédures en utilisant un module de classe, par contre, je ne pourrais pas t'aider...
Mais regard ici, il y a de bons exemples

Bon courage,

@+

 

[Cousinhub]

Re : MouseMove

Bonjour,

Salut Romain

un petit fichier exemple, avec un module de classe

LE code d'initialisation se trouve dans le WorkBook_Open

Dès que tu survoles un bouton d'option, tu verras apparaître le Caption du bouton (Remplace le code MSGBOX par ton code, dans le module de classe)

 

[excalibur]

Re : MouseMove

bonjour dhiouf bhbh porcinet82 le forun un ex avec 8 optionbuttons

a adapter

 

[dhiouf]

Re : MouseMove

Re bonjour
merci excalibur de ta réponse c'est ça que je veux
Merci à tous