Select data from list box

[Grieg]

I have a form with a combo box (cmbUser) and two text boxes (txtUser & txtBranch). The combo box has 2 columns. When an item is highlighted in the combo box and the user clicks a select button I need to set txtUser to the data in column 1 and set txtBranch to the data in column 2. The data from the columns also needs to be stored in 2 public strings (pblUser & pblBranch).

I can do this ok with just one column but can't figure out how to get the data from the other column. The code I have for the first column is;

pblUser = Me!cmbUser
txtUser.Value = pblUser
txtUser.Requery

Could anyone help?

 

[jebry]

Hi!

Use this code:

Dim intRow As Integer

For intRow = 0 To Me!cmbUser.ListCount - 1
If Me!cmbUser.Selected(intRow) = True Then
txtBranch.Value = Me!cmbUser.Columns(1, intRow)
pblBranch = txtBranch.Value
Exit For
Next intRow

hth
Jeff Bridgham
bridgham@purdue.edu

 

[Grieg]

Jeff,

Thanks for your help -its much appreciated.

Grieg.