VBA Excel ajouter label incrémental sur formulaire [Résolu]

Richard_9 26 Messages postés mardi 13 juillet 2004Date d'inscription 1 juillet 2008 Dernière intervention - 10 mai 2006 à 10:02 - Dernière réponse : michelxld 402 Messages postés vendredi 6 août 2004Date d'inscription 12 octobre 2008 Dernière intervention
- 13 mai 2006 à 10:13
Bonjour,
j'ai créé un form Frm_intro dans lequel j'ai posé un texbox txtbox_nb pour récupérer le nombre de produits à introduire.

Je voudrais une fois le nombre de produits introduits, poser sur le form autant de label que le nombre introduit.
Par exemple si j'ai 10 produits à introduire, poser sur le form les label
lbl_001, lbl_002, lbl_003, .... avec comme caption du label le N° d'ordre,
comme ceci :
1
2
3
4
Je pourrais alors introduire mes produits l'un après l'autre sur une seule ligne et faire apparaître ce qui a déjà été introduit juste en dessous.
Comment puis-je faire ?
Merci
Afficher la suite 

2 réponses

michelxld 402 Messages postés vendredi 6 août 2004Date d'inscription 12 octobre 2008 Dernière intervention - 13 mai 2006 à 10:13
+3
Utile
Pfff...

décidément c'est pas mon jour ...

l'anotation "'boucle pour créer les frames" , n'a bien sur rien à voir avec la macro ...

bonne journée
michel
Cette réponse vous a-t-elle aidé ?  
michelxld 402 Messages postés vendredi 6 août 2004Date d'inscription 12 octobre 2008 Dernière intervention - 13 mai 2006 à 10:12
0
Utile
bonjour

je n'ai pas compris la fin de ta question , mais pour ajouter les Labels tu peux essayer

Private Sub CommandButton1_Click()
Dim Lbl As Control
Dim x As Byte, j As Byte


If txtbox_nb = "" Or Not IsNumeric(txtbox_nb) Then Exit Sub
x = txtbox_nb



For j = 1 To x 'boucle pour créer les frames

Set Lbl = Me.Controls.Add("Forms.Label.1")

With Lbl
.Name = "Lbl_" & j
.Object.BackColor = RGB(125, 125, 125)
.Object.Caption = j
.Object.TextAlign = 2
.Left = 10 + ((j - 1) * 100)
.Top = 50
.Width = 90
.Height = 14
End With


Set Lbl = Nothing
Next j
End Sub



bonne journée
michel

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.