Rowsource combobox liste fixe

Pierrot93

XLDnaute Barbatruc

• 21 Janvier 2014

• #2

Re : Rowsource combobox liste fixe

Bonjour,

utilise une boucle et la propriété "additem" :

Code:

Private Sub UserForm_Initialize()
Dim i As Integer
For i = 1 To 20
    ComboBox1.AddItem i
Next i
End Sub

bonne journée
@+

 

Vote positif 0 Vote négatif

BOISGONTIER

XLDnaute Barbatruc

Repose en paix

• 21 Janvier 2014

• #3

Re : Rowsource combobox liste fixe

Bonjour,

Private Sub UserForm_Initialize()
Me.ComboBox1.List = Array(1, 2, 3, 4, 5)
End Sub

JB

 

Vote positif 0 Vote négatif

B

bonoboas

XLDnaute Occasionnel

• 21 Janvier 2014

• #4

Re : Rowsource combobox liste fixe

Donc je ne mets rien dans les propriétés de combobox, je suis obligé de passé par du VBA ?

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 21 Janvier 2014

• #5

Re : Rowsource combobox liste fixe

Re,

Donc je ne mets rien dans les propriétés de combobox, je suis obligé de passé par du VBA ?

Cliquez pour agrandir...

avec les solutions proposées, oui.

 

Vote positif 0 Vote négatif

Misange

XLDnaute Barbatruc

• 21 Janvier 2014

• #6

Re : Rowsource combobox liste fixe

Bonjour
Une autre solution,
tu écris tes 1, 2, 3... dans une feuille du classeur (cachée éventuellement) et tu y fais référence dans la propriété rowsource :
data!A12:A34
ou bien tu nommes cette plage et tu fais référence à ce nom directement dans la propriété RowSource
mais tu ne peux pas écrire les valeurs directement dans la rowsource.

 

Vote positif 0 Vote négatif

B

bonoboas

XLDnaute Occasionnel

• 27 Janvier 2014

• #7

Re : Rowsource combobox liste fixe

Merci Misange j'ai pris votre solution.

 

Vote positif 0 Vote négatif