Scroll a list box to selected item (Repost)

  • Thread starter Thread starter Nelson
  • Start date Start date
N

Nelson

I have code that selects an item in a list box that works fine (below) but I
would like to add code to scroll down to the selected item to show it. The
ListBox.Mutiselect is set to extended (3)

Anyone know how I would do that?
TIA
Nelson

If OpenArgs <> "" Then
For i = 0 To PatientList.ListCount - 1
If PatientList.ItemData(i) = OpenArgs Then
PatientList.Selected(i) = True
Exit For
End If
Next i
If i = PatientList.ListCount Then
DoCmd.Close
MsgBox "There are no claims to print for this patient."
End If
End If
 
You can set the ListIndex prop to your var "i" in the sample code you
posted. Remember, the ListBox control MUST have the focus in order for
you to be able to write to the ListIndex prop.

--

HTH
Stephen Lebans
http://www.lebans.com
Access Code, Tips and Tricks
Please respond only to the newsgroups so everyone can benefit.
 
Stephen,

That did it! Thanks! I didn't try the listindex property since VB help
states it is read only. Thanks again.

Nelson
 
Never believe everything you read!<grin>
:-)

--
HTH
Stephen Lebans
http://www.lebans.com
Access Code, Tips and Tricks
Please respond only to the newsgroups so everyone can benefit.
 
You must log in or register to reply here.

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Scroll a list box to selected item 2
Add code to handle All jobs FROm dropdown list if None selected- 5
Can Vba workout if a selection is part of a group? 0
Copying List box values/selection to a database of sorts 2
Multi-Select List for a Report 1
Works, But Doesn't Filter 1
Two multi-select list boxes 3
CrossPosat - Multiple Criteria in a List Box 2

Back
Top