Bonjour à tous,

Je n'arrive pas a afficher tous les noms qui sont dans une feuille Excel (il y a environ 270 ligne) voici le code que j'utilise :

-------------------------------------------------------

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Private Sub CheckBox1_Click()
    Dim i As Byte
 
    If CheckBox1 Then
        'Boucle sur tous les noeuds du TreeView.
        For i = 1 To TreeView1.Nodes.Count
            TreeView1.Nodes.Item(i).Expanded = True
        Next
    Else
        For i = 1 To TreeView1.Nodes.Count
            TreeView1.Nodes.Item(i).Expanded = False
        Next
    End If
 
    'Positionne le 1er noeud dans la partie visible du TreeView
    TreeView1.Nodes.Item(1).EnsureVisible
End Sub
-------------------------------------------------------------------------

Est ce qu'il y a une limite d'affichage.

Merci d'avance de votre aide.