Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
Dim Infos as string 
Infos = Split(ListBox1.Text, "_") 
sheets("feuil1").Range("dm1") = Infos(3)
Je souhaiterais également que lorsque je clique sur la listbox qu'il détecte les doublons
pareil sur une partie du texte .le même texte que pour le (SPLIT) ci dessus.
Je débute en VBA pas facile!!