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 :
Mais ca ne marche pas . Avez vous une idée ?
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







Répondre avec citation
Partager