Boucle sur commandButton. qq peut m'aider?

[IFFIC]

Bonsoir à tous et mes vœux de plein de bonnes choses pour 2005 et plus…

Je sèche lamentablement

Voici mon souci :

Je donne aux 20 boutons d’un USF les noms qu’il aura été choisi par l’utilisateur dans une liste établie verticalement dans la feuille
«CATEGORIES » à partir de la cellule (10,1)

Private Sub UserForm_Activate()
For i = 10 To 29
Controls("CommandButton" & i - 9).Caption = Worksheets
("CATEGORIES").Cells(i, 1)

‘ Au passage, je cache les boutons inutiles

If Controls("CommandButton" & i - 9).Caption = "" Then
Controls("CommandButton" & i - 9).Visible = False
End If
Next i

End Sub

Par la suite j’aimerais récupérer son « Clic » sur l’un des dits boutons dans l’USF par un truc du genre :

CHOIX = Controls(CommandButton).Caption ….
Et provoquer l’action voulue…
Ou Label1.Caption = "CHOIX"

Sinon, je vais devoir me farcir 19 fois « Bouton 1 quand clic, bouton 2 et c.

Je suis certain qu’il y a plus rapide et plus efficace....... Pas vrai?

Merci d’avance pour un petit coup de main.

IFFIC

 

[Brigitte et Jmps]

Bonsoir Iffic,


Alors t'as retrouvé ton short ?

Le revoici... J'ai compris.... Joli !!! Bisous à toi...

A bientôt,

 

[jmps]

Salut la fée Clochette, je t'assure je n'y suis pour rien dans ton histoire de short. C'est un reste de post de tout à l'heure. Mais Lol quand même ton short.

Bonne nuit.

José

 

[jmps]

N'insiste pas Brigitte, on va nous prendre pour des fées siamoises !

 

[Brigitte]

Argh,


Je peux plus me débarrasser de Jmps....


A y est ?


Brigitte

 

[jmps et Brigitte]

C'est pas fini ce délire !?

 

[jmps]

Je remets mon nom.

Bonne nuit les amis. A demain.

José (jmps tout seul).

 

[IFFIC]

C"est malin, j'fais comment maintenant avec mon post???
Quant à mon short, je sais....

Pour la "Bourse" aux idées qui pourrait résoudre mon souci;
je suis mâlel barré!!!!

Y'a quelque chose qui "Cloche", je reviens demain....

Bisous Brigitte.

Salut José

Bonne fin de soirée ou bon début à vous, suivant l'heure.

N'empêche que je suis toujours coincé.
.........................Avec ma macro............. Je précise!!!!

Personne ne voudra plus m'aider maintenant. Snifff

Merci les copains !!! C'est gentil!

Un USF qui marche, c'est bien, mais un grand sourire qui éclabousse,
c'est bien aussi.......Pas vrai?

IFFIC

 

[jmps]

Bonjour IFFIC, Bonjour Fée Clochette ;°)

Pleure pas IFFIC ! Un grand garçon en short comme toi...!
Attends........ Papa jmps va se pencher sur ton problème.... Ouarf !

Pourrais-tu poster un exemple car je ne comprends pas tout. Tu parles de boutons sur un USF et dans ton code tu mets Controls("CommandButton" & i - 9).Caption, ce qui laisserait penser à des boutons sur une barre d'outils. Qu'est-ce donc qui cloche ? Tous ces boutons ça me fout le "bourdon" LoL ! C'est pourtant pas encore Pâques....

A+

PS : C'est vrai ça Brigitte.... Que fis-tu du fil d'IFFIC ?!!!

 

[IFFIC]

Bonjour José et à tous

En coup de vent ce midi pour déjà te dire merci.

Je poste un morceau ce soir

Bon après-midi

IFFIC