troubleshooting Question
MS Access 2003 COmbobox and VBA - Selected Item
asked on
My attached code works fine...
But, I've been out of VBA for a while.
When I select an Item, I want to display both columns...not just the bound one.
How do I do that?
But, I've been out of VBA for a while.
When I select an Item, I want to display both columns...not just the bound one.
How do I do that?
Dim cmd1 As New ADODB.Command
Dim rst1 As ADODB.Recordset
'Connect to db and run stored proc based on Client ID
cmd1.ActiveConnection = CurrentProject.Connection
cmd1.CommandType = adCmdStoredProc
cmd1.CommandText = "usp_MarketingVisitationsGet"
cmd1.Parameters("@ClientID") = Me.txtClientID.Value
'Set the recordset
Set rst1 = cmd1.Execute()
With Me.cmbVisits
.RowSourceType = "Value List"
.BoundColumn = 1
.ColumnCount = 2
.ColumnWidths = ".5in;1.5in"
.ColumnHeads = False
End With
With rst1
.MoveFirst
Do Until .EOF
cmbVisits.AddItem !id & ";" & !visitStatus
.MoveNext
Loop
End With
Join the community to see this answer!
Join our exclusive community to see this answer & millions of others.
Unlock 1 Answer and 3 Comments.
Learn from the best
Network and collaborate with thousands of CTOs, CISOs, and IT Pros rooting for you and your success.
Andrew Hancock - VMware vExpert
See if this solution works for you by signing up for a 7 day free trial.
Unlock 1 Answer and 3 Comments.
Try for 7 days”The time we save is the biggest benefit of E-E to our team. What could take multiple guys 2 hours or more each to find is accessed in around 15 minutes on Experts Exchange.