Bonjour,

J'aimerai stocker le contenu d'une ListBox dans un tableau a 2 dimensions afin de faire un filter multicolonne. J'ai fait le code ci dessous :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
 Dim Tbl2: ReDim Tbl2(1 To ListBox1.ListCount - 1, 1 To ListBox1.ColumnCount)
            j = 0
             For i = 1 To nbrows - 1
                       j = j + 1
                       Tbl2(i, j) = tab(ListBox.List(I).ListBox.column(j))
                       On Error Resume Next
            Next I
Mais ca ne marche pas . Avez vous une idée ?