-
If you would like to post, please check out the MrExcel Message Board FAQ and register here. If you forgot your password, you can reset your password.
pull up data based on a combo box?
- Thread starter afs24
- Start date
SydneyGeek
MrExcel MVP
- Joined
- Aug 5, 2003
- Messages
- 12,251
I'll assume that you want to "push" data to textboxes using a selection. IF so, modify the combo's RowSource so that all of the desired data you want to push is in the query. For example, MyCombo is bound to SomeID and you want to push data into Field1, Field2, Field3... The Combo should have the following fields in its query grid (accessed by pressing the ... at the right of the RowSource row):
Close, save when prompted, and adjust the ColumnCount (or Columns) property to match the number of fields in the query.
Now go to the Events tab and hit the Builder button in the AfterUpdate event. Select the Code option and you'll be in a module with
Your cursor will be in the blank line in the subroutine. Type this:
TextBox1=MyCombo.Column(2)
TextBox2=MyCombo.Column(3)
etc.
The final result is
Save, close and give it a go. Note: columns in Combo and ListBoxes are indexed from 0, not 1.
Denis
Code:
SomeID SomeDescriptiveField Field1 Field2 Field3 etc.Close, save when prompted, and adjust the ColumnCount (or Columns) property to match the number of fields in the query.
Now go to the Events tab and hit the Builder button in the AfterUpdate event. Select the Code option and you'll be in a module with
Code:
Private Sub MyCombo_AfterUpdate()
End SubTextBox1=MyCombo.Column(2)
TextBox2=MyCombo.Column(3)
etc.
The final result is
Code:
Private Sub MyCombo_AfterUpdate()
TextBox1=MyCombo.Column(2)
TextBox2=MyCombo.Column(3)
etc
End SubSave, close and give it a go. Note: columns in Combo and ListBoxes are indexed from 0, not 1.
Denis
Upvote
0
Similar threads
- Solved
