II-H. Affichage dans la zone visible▲
La méthode EnsureVisible fait apparaître la ligne spécifiée dans la fenêtre de la ListView.
La macro suivante déplace le 50eme item dans la partie visible de la Listview.
Vba
Sélectionnez
Listview1.ListItems(50).EnsureVisible Si vous souhaitez afficher le 50eme item de la listView dans la première ligne de la partie visible (l'équivalent de TopIndex dans une ListBox), utilisez.
Vba
Sélectionnez
Private Sub CommandButton2_Click()
Dim i As Integer
For i = 1 To ListView1.ListItems.Count
ListView1.ListItems(i).EnsureVisible
'50 est la ligne que vous souhaitez placer dans tout en haut de la zone visible
If 50 = ListView1.GetFirstVisible.Index Then Exit For
Next i
End Sub