.("CommandButton" & X)" Le “X” en variable?

[IFFIC]

.("CommandButton" & X)" Le “X” en variable?

Coucou et bonsoir à tous

Je tente de faire une boucle sur la feuille « ADHERENTS »
Pour créer dans un USF les boutons correspondants…

Je me heurte à la fichue obligation de : « CommandButton.1 »

N’ayant pas envie de me farcir : Bt1, Bt2, Bt3… et ... Bt..j’en ai marre

Si une bonne âme charitable passait par là pour me filer un tuyau,
…. Je coince !!!

Je lui serais fort reconnaissant….

Comme je le suis déjà depuis un grand morceau de temps pour
bien d’aides dans ce forum.

--------------------------------------------------------------------
Dim T As Integer
Dim X As Integer


Private Sub UserForm_Initialize()

T = 1
X = 1

UserForm1.Controls.Add "Forms.CommandButton.1"

' Je cherche en fait, et en VAIN, un truc du genre:

'UserForm1.Controls.Add "Forms.("CommandButton" & X)"

'Pour le reste, cela fonctionne...

With UserForm1.Controls(T)

For i = 1 To 3

.Caption = Worksheets("ADHERENTS").Cells(i, 1)
.Top = 26
.Left = 32
'. Et c.

Next i

On Error Resume Next

End With

End Sub

Bonne soirée, et merci d’avance.

IFFIC