Création de label par VBA (excel)

Bonjour,

J'aimerai que lors de l'initialisation de mon formulaire des labels(intitulés en francais) soient créés et placés.
Ca me parait simple mais j'ai beau chercher je ne trouve rien ...
Pour etre concis, c'est la syntaxe qui me permet de crééer des labels ds 1 userform que je cherche

Si qqn peut me répondre, ca me serait d'une grande aide ... ;)

bonjour

j'espere que cet exemple pourra t'aider

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17

Private Sub UserForm_Initialize() Dim Obj As Control Dim i As Integer   For i = 1 To 3 'boucle pour la création des Labels Set Obj = Me.Controls.Add("forms.Label.1") With Obj .Name = "monLabel" & i .Object.Caption = "le texte" & i .Left = 140 .Top = 30 * i + 10 .Width = 50 .Height = 20 End With Next i   End Sub

---

michel

Merci c'est exactement ce que je cherchais !! ... et ca faisait un bout de temps que j'épluchais l'aide
Super !!! :D