Combo Box question?

[Javi]

I have a combo box with a Row Source of =(J3:J6).

J3:J6 contains the names I want the user to see and use as there selection however would like the combo box to use K3:K6 as the actual data.

I'm using this combo box on a form.

Thanks..

 

[MickG]

Perhaps this:-

Private Sub ComboBox1_Change()
With ComboBox1
 MsgBox Range(.RowSource)(.ListIndex + 1).Offset(, 1)
End With
End Sub

Mick

 

[Javi]

So this can not be accomplished in the Properties on the combo box it self?

 

[MickG]

The idea is you click you seletion and the code returns the Results from the cell to the right.
There may be other ways , but I do not think in the properties.

 

[Norie]

You can set the source to J3:K6, the column count to 2 and the bound column to 2.

Then when you use ComboBox1.Value you'll get the value from the 2nd column, which you can hide.

Not sure if that's what you want.

PS You can hide the 2nd column by setting it's columb width to 0.

 

[mikerickson]

With ComboBox1
    .ColumnCount = 2
    .ColumnWidths = ";0"
    .BoundColumn = 2
    .TextColumn = 1
    .List = Range("J3:K6")
End With

If you fill the ComboBox with the above code. The values from column J will be what is seen in the combo box, and ComboBox1.Text will return that. Combobox1.Value will return the value from column J of the selected item.

 

[mikerickson]

OOOps. Typo above

"ComboBox1.Value will return the value from column K of the selected item>"

 

[Norie]

mike

Don't you need Value after the range?

I always get that wrong.

 

[Javi]

Norie That's exactly what I am looking for however when I make those modifications I do not get the values in the next cell. I am getting blank.

 

[Javi]

Mikerickson I'm relatively new to VBA so please have patience. Would this code be put under the combo box or somewhere else?