Combobox en boucle

[TREDI-GEREP]

Bonjour,

Premiere question sur le forum, on va essayer de se faire comprendre !
J'ai un userform avec 1 textbox contenant un chiffre x.je voudrais creer donc x combobox avec comme nom de combobox thiv"x" 😱

si pas clair faite sonner 😀

Merci par avance de votre aide

Tredi

 

[Hervé]

Re : Combobox en boucle

bonjour tredi 🙂

bienvenu à bord

bon, ben, je fait sonner 😉

tu veux créer tes combobox à la volée ? ou simplement les masquer à l'initialisation de l'USF et les faire apparaitre suivant ta textbox ?

salut

 

[TREDI-GEREP]

Re : Combobox en boucle

En fait je voulais créer x combobox en fonction d'un nombre donné dans un textbox d'un usf. j'ai boosé sur cela ce week-end et j'ai trouve !! , bn je vais le code si ça interesse qqu'un 😀

Private Sub com_Change()
Dim nbrcom, i, j As Integer
Dim CBox As Control
Dim thivv1 As String

nbrcom = com.Value
Sheets("TABLE 3").Select
If nbrcom = "" Then
MsgBox ("Veuillez inserer un chiffre")
Else
For i = 1 To nbrcom

On Error Resume Next

Set CBox = Me.Controls.Add("Forms.Combobox.1")
With CBox
.Name = "thiv" & i
.Left = 135
.Top = 80 + ((i - 1) * 22)
.Width = 168
.Height = 15.5
.RowSource = "AI1: AI66"

'.ListRows = 12
.BackColor = &HC0FFFE
.Tag = i
End With
Columns("AI:AI").Select

Voilou

 

[TREDI-GEREP]

Re : Combobox en boucle

Ben !! je reviens vers vous car je ne sais pas comment recuperer les valeurs de chacun des combobox crees ??😱😱😱 😕

Merci de votre aide

 

[TREDI-GEREP]

Re : Combobox en boucle

Ben !! je reviens vers vous car je ne sais pas comment recuperer les valeurs de chacun des combobox crees

Merci de votre aide

il n'y a personne pour m'aider 🙁🙁 SVP

 

[MJ13]

Re : Combobox en boucle

Bonjour

Le mieux serit de placer un fichier (on ne le dira jamais assez!).

 

[TREDI-GEREP]

Re : Combobox en boucle

🙄Voici qui est fait !!

je creer des combobox en fonction du textbox et je voudrais recuperer apres les valeurs selectionnées. Voilou.

Merci par avance

 

[Guest]

Re : Combobox en boucle

Voici pour un premier jet le fichier ci-joint

Regarde dans le module de classe 'clsCombo 'et comment est créé un tableau de comboBox dans le code du UserForm.

Ce n'est qu'un début pour expliquer la manière de faire.
Maintenant si l'utilisateur entre un nouveau nombre, 2 solutions:
1 - il faut détruire le groupe (tableau) et les références aux combobox qu'il contient, détruire les combobox du UserForm pour en créer de nouveaux.

2 - ne créer que les nouveaux combobox si le nombre demandé augmente ou détruire les combobox excédents si le nouveau nombre est inférieur à ceux présents sur le userform.

Ceci pour maintenir une cohérence entre le nombre de combo box sur le UserForm et le tableau qui contient leurs référence.

 

[Guest]

Re : Combobox en boucle

voilà une mouture plus aboutie

 

[TREDI-GEREP]

Re : Combobox en boucle

voilà une mouture plus aboutie

😱 Ouf ca c'est du vba !! c'est exactement ce que je voulais !! 😉

Merci Hasco !!!

 

[MJ13]

Re : Combobox en boucle

Re bonjour à tous!

Merci Hasco. quelle classe!