ComboBox.AddItem

[Evelynetfrancois]

Bonjour , à tout le forum ................
voici ma Question

Est-il possible, comme dans une ListBox , de » ramener » les valeurs de deux colonnes dans un ComboBox (cellules juxtaposées (colonnes 10 et 11 ))

With Sheets("materiel")
Line = .Cells(100, 10).End(xlUp).Row + 1
For Each Cell In .Range(.Cells(2, 10), .Cells(Line, 10))
ComboBox2.AddItem Cell.Value
Next

Deviendrait alors : (évidement ça ne marche pas, c est juste pour montrer l’esprit)

With Sheets("materiel")
Line = .Cells(100, 10 & 11).End(xlUp).Row + 1
For Each Cell In .Range(.Cells(2, 10 & 11), .Cells(Line, 10 & 11))
ComboBox2.AddItem Cell.Value
Next

Merci pour toutes vos idées

bonne aprés midi

E et F

 

[PascalXLD]

Re : ComboBox.AddItem

Bonjour

je verrai plutot ça comme ceci (sans tester)

With Sheets("materiel")
Line = .Cells(100, 10 ).End(xlUp).Row + 1
For Each Cell In .Range(.Cells(2, 10), .Cells(Line, 10))
ComboBox2.AddItem Cell.Value & cell.offset(0,1).value
Next

 

[Evelynetfrancois]

Re : ComboBox.AddItem

Merci Pascal
c'est exactement se qu'il me fallait
et j'étais loin du offset !!!!!
super

bonne journée et encore Merci

E et F