Voila la situation
 
J'ai une plage de cellule variable , une userform1 crée et vide.
 
J'aimerait crée un label pour chaque cellule avec pour intituler le contenu de la cellule.
 
Le probleme est que je ne sais pas crée un label en VBA, encore moins la positionner.
 
voila le début de mon code :
 
Sub Formulaire()
 
Dim i, l, t As Integer
 
i = 2
Do While (Sheets("Temp" ).Cells(i, 1).Value <> "" )
 
'Création des labels de nomenclature niveau 1
If Sheets("Temp" ).Cells(i, 1).Value = 1 Then
 
 
 
End If
 
'Création des labels de nomenclature niveau 2
If Sheets("Temp" ).Cells(i, 1).Value > 1 Then
 
End If
 
 
i = i + 1
 
 
Loop
 
 
End Sub
 
 
Entre chaque if je doit crée un label avec pour intituler le contenue de la cellule (i,2) et une msgbox pour le premier if

Quelqu'un aurait une solution , c'est assez urgent a vrai dire

Vraiment personne pour m'aider ?

Help me plz

Pour insérer un label dans  userform1
Set MonLabel = userform1.Controls.Add("Forms.Label.1",<nomdeton label> )
 
Pour positionner ton label
MonLabel.top = xx
MonLabel.left=yy
 
Pour écrire ton texte
MonLabel.caption="ton texte"