Select values from 3 colums with a combo box

[joee]

Hi.
I have a combo box on a form which looks up values in a separate table and stores it in one bound field on my form. Now I would like to fill values into 2 more fields on the form when i do my selection with the combo box. When I make the drop down on the combo box I see the values which I want transferred onto the form but I cannot make it work. Is this possible to with the combo box ?
Appreciate any assistance.Thanks in advance.

[pbaldy]

To simply display the values in a textbox:

=ComboName.Column(x)

where x is the column number you want (zero based). To place the value into a textbox bound to a data field, this in the after update event of the combo:

Me.TextboxName = Me.ComboName.Column(x)

[joee]

Thanks for quick answer.

Sorry but I cannot make it work.
I have uploaded a small sample DB. Please would you be able to give in keystrokes required in this DB and upload againg.
On the form Project I want the fields Duration & Option to be filled out with values from the combo box once I make selction in field Task.
Appreciate any help , thank you very much in advance
Br, Joee

To simply display the values in a textbox:

=ComboName.Column(x)

where x is the column number you want (zero based). To place the value into a textbox bound to a data field, this in the after update event of the combo:

Me.TextboxName = Me.ComboName.Column(x)

[pbaldy]

Why don't you post a db where you've actually tried it, and we'll figure out what you're doing wrong?

[joee]

Hi again
My problem is to understand exactly what you do. I have uploded sample DB where I have tried to follow your input for the textbox "Duration"
If you open the form Projects you will see text box "Duration" has no connection.
My target is to get the value selected from the combo box (field Task) into the table for 3 colums. Ie Task , Duration & Option.

Appreciate if you can show how to in the sample DB
Br Joee

[pbaldy]

Like I said, you use the after update event of the combo:

Private Sub Task_selection_AfterUpdate()
  Me.Duration = Me.Task_selection.Column(2)
End Sub

If you're not sure how to start the code:

http://www.baldyweb.com/FirstVBA.htm

By the way, the spaces in your names are not worth the trouble in the long run.