Combobox list 3 column

Hi All,

Please help how to view combobox list until 3 Column .

In Example
Combobox PartID : (PARTID,TYPE)

Need Result
Combobox PartID : (PARTID,TYPE,PARTDESC)


Thanks - John

Originally Posted by vlady

create a named range with the 3 columns--->PARTID,TYPE,PARTDESC selected
your named range say "ALL" refers to: =LookupLists!$E$2:$G$8

in the properties of the combobox look for the "Column Count" change that to "3"
then in the Listfillrange use the named range from the 3 columns ->
Listfillrange: ALL

Hi Vlady,

Thanks for support, i'm do until until step 2 ( "Column Count" change that to "3"), but i'm newbie for this VBA need help where's listfillrange .... if i not wrong for this code ..

Me.cboPart.Clear
For Each cPart In ws.Range("PartIDList")
  With Me.cboPart
    .AddItem cPart.Value
    .List(.ListCount - 1, 1) = cPart.Offset(0, 1).Value
  End With
Next cPart

or still properties combobox but no see listfillrange ...

Thansk - John

Please explain for more detail if i make stupid mistake

Originally Posted by vlady

first offset returns "Type"
.List(.ListCount - 1, 1) = cPart.Offset(0, 1).Value

add another offset for the "Part Descr."

.List(.ListCount - 1, 2) = cPart.Offset(0, 2).Value

Hi Vlady,

Do you mean be like this

Me.cboPart.Clear
For Each cPart In ws.Range("PartIDList")
  With Me.cboPart
    .AddItem cPart.Value
    .List(.ListCount - 1, 1) = cPart.Offset(0, 1).Value
    .List(.ListCount - 1, 2) = cPart.Offset(0, 2).Value 
  End With
Next cPart

I'm test and work like charm.

Thank you very much - John