Display the 2. value selected from a combo box in a text field

[angybab]

Hi again,
My combobox has two cloumns. First column has a code and the second a description.
The first column is bounded.
I added a text field so that when I make a selection, the code is displayed in the combobox and the corresponding text in the text field.


I use a vba code that looks like this:

Private Sub cboSomething_AfterUpdate()
Me!txtSomething= Me!cboSomething.Column(1)
End Sub

since this didn't work. I changed it to :

Private Sub cboSomething_AfterUpdate()
Me.txtSomething= Me.cboSomething.Column(1)
End Sub

but it's still not working. Can anyone help?

[June7]

Is textbox UNBOUND? Code won't work nice for continuous or datasheet form because setting an unbound textbox value will show the same for every instance of textbox.

Don't really need VBA. Expression in textbox ControlSource can display combobox text: =[cboSomething].[Column](1)

Why do you want code to show in combobox? If this is an autonumber value then it should not have meaning to users and no need to display.

[angybab]

Hi, thanks for your quick response. Yes the textbox is unbound
I will try that to see if it will work

[CJ_London]

ignore - you have set the combo to have two columns

[Micron]

ignore - you have set the combo to have two columns

But the first column width should be zero, which was only mentioned in the abstract. I don't see a need for a text box to display a value that's being shown in a combo list when you can just show it in the combo.