Bonjour

Si le fichier texte est de taille raisonnable :


Dim maSourceList As New List(Of String)

For Each line As String In File.ReadLines("d:\Repertoire\Filetxt")

'pas top : a...