Discussion :

[Yoshiblow]

Bonjours,

Voilà un petit moment que j'essaie de configurer une ComboBox que j'ai placé sur une feuille, et je n'arrive pas à utiliser les même lignes de code que pour le Userform tel que :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Private Sub UserForm_Initialize()
ComboBox1.AddItem ("A")
ComboBox1.AddItem ("B")
ComboBox1.AddItem ("C")
End Sub
 
' ou même
 
Me.ListBox1.RowSource = "Feuil1!Liste"
 
' ou encore
 
For Each c in Selection.Cells
ComboBox1.AddItem (c.value)
Next

Et je vous avoue ne pas avoir trouvé dans la FAQ mon bonheur. Comment faire? Faut il forcement utiliser un DialogBox ou Userform pour un ComboBox?

[SfJ5Rpw8]

sous excel il y as 2 boites à outils qui comprennent des combobox ... laquelle à tu utilisé...

[Yoshiblow]

La boîte à outils contrôle, sur une feuilles.

Faux? Nul? Zero?

[SfJ5Rpw8]

ben tu peu accéder au contrôle de la même façon que pour un contrôle sur un userform...
soit directement dans le code de la feuille:

Par exemple avec un combox et un bouton sur ta feuille:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
 
Private Sub CommandButton1_Click()
Dim i As Integer
For i = 1 To 10
 ComboBox1.AddItem i
Next
End Sub

où depuis un autre module en précisant la feuille:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
 
Sub Test()
  Dim i As Integer
  For i = 1 To 10
    ThisWorkbook.Sheets("Feuil2").ComboBox1.AddItem i
  Next
End Sub

[Yoshiblow]

Merci beacoup,

Je suis pas doué...