Discussion :

[toumou2018]

Bonjour

je suis un nouveau membre sur votre groupe , je suis fasciné par la qualité de vos tutoriels . cepandant j'arrive pas à alimenter un tableau dynamique à partir des élements sélectionnées sur une listbox d'un userform .
j'ai essayé ça mais ça marche pas :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
Dim tp1() As String
ReDim tp1(5)
dim i as integer
dim f as integer 
f=0
For i = 0 To 1000
    ReDim tp1(UBound(tp1) + 1)
    If ListBox1.Selected(i) = True Then
        tp1(f) = ListBox1.List(i)
        MsgBox tp1(f)
        f = f + 1
    End If
Next i

en effet lorsque le code s'exécute il m'affiche d'autre éléments que j'ai ps sélectionné dans la liste.
merci si vous pouvez m'aider.

[toumou2018]

mon objectif c'est de faire la différence entre deux tableaux string dont l'une ( tab1 ) contient tous les élements de listbox1 et (tab2 ) contient les élements sélectionnés et stocker la différence dans un tableau array pour l'utiliser dans un auto-filter