You are using an out of date browser. It may not display this or other websites correctly.
You should upgrade or use an
alternative browser.
-
A
Dim lvw as listiview
Set lvw = me.myLvw.object
lvw.listItems.Item(lvw.listItems.Count - 1).Selected = True
Set lvw = nothing