Logo GNT
Actualités Tests & Guides Bons Plans
Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11
Entraide Applications Microsoft Office Excel VBA - userform

VBA - userform

2 réponses
Avatar
Nyck0las
Bonjour,

je suis en train de r=E9aliser un userform et je souhaiterais
initialiser plusieurs combobox de fa=E7on identique et d'un seul coup si
possible mais je sais pas trop comment faire. A mon humble avis il
faudrait cr=E9er une sorte de groupe ...
Signaler un problème avec ce contenu

2 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
JB
Bonjour,

Private Sub UserForm_Initialize()
Me.ComboBox1.AddItem "aa"
Me.ComboBox1.AddItem "bb"
Me.ComboBox1.AddItem "cc"
Me.ComboBox1.AddItem "dd"
For i = 2 To 4
Me("combobox" & i).List = Me.ComboBox1.List
Next i
End Sub

http://cjoint.com/?ctmHeTuIJK

JB
http://boisgontierjacques.free.fr/

On 19 fév, 12:18, Nyck0las wrote:
Bonjour,

je suis en train de réaliser un userform et je souhaiterais
initialiser plusieurs combobox de façon identique et d'un seul coup si
possible mais je sais pas trop comment faire. A mon humble avis il
faudrait créer une sorte de groupe ...


Avatar
Daniel.C
Bonjour.

Private Sub UserForm_Initialize()
Dim Ctrl As Control
For Each Ctrl In Me.Controls
If Left(Ctrl.Name, 5) = "Combo" Then
Ctrl.AddItem "toto"
Ctrl.AddItem "titi"
End If
Next Ctrl
End Sub

Cordialement.
Daniel
"Nyck0las" a écrit dans le message de news:

Bonjour,

je suis en train de réaliser un userform et je souhaiterais
initialiser plusieurs combobox de façon identique et d'un seul coup si
possible mais je sais pas trop comment faire. A mon humble avis il
faudrait créer une sorte de groupe ...