Bonjour,ja'i du mal à remplir ma combobox(cbxprix) avec les valeurs d'un tableau(prix)
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
 
Private Sub UserForm_Initialize()
Dim prix As Variant
Set prix = Range("a2:c2").Cells
Do While i < UBound(prix) + 1
travail.cbxprix.AddItem (prix(i))
Loop
End Sub
ma userform s'appelle travail.quand j'arrive à ubound j'ai un message "incompatibilité du type".je ne sais pas utiliser ubound pour un tableau à 2 dimensions.
merci de votre aide