Hi Tom,
Me.SomeListbox.Column(2)
will return the value in column 3 of the selected row.
That only works with a single select list box (Multiselect property set to
None). Try something like this, instead:
Function InterateSelections() As Variant
On Error GoTo ProcError
Dim varCategory As Variant
For Each varCategory In Me.SomeListbox.ItemsSelected()
Debug.Print Me.lboProjects.Column(2, varCategory)
Next varCategory
ExitProc:
Exit Function
ProcError:
MsgBox "Error " & Err.Number & ": " & Err.Description, _
vbCritical, "Error in InterateSelections Function..."
Resume ExitProc
End Function
Tom Wickerath
Microsoft Access MVP
http://www.accessmvp.com/TWickerath/
http://www.access.qbuilt.com/html/expert_contributors.html
__________________________________________
:
Me.SomeListbox.Column(2)
will return the value in column 3 of the selected row.
-Tom.
__________________________________________
:
Hi
How can I get the value of the third column of a multi-select list box?
Thanks
Regards