Bonjour,

J'essaye de récupérer le nom des fichiers de toutes les lignes sélectionnées dans mon filelistbox(ici fichiers) mais le programme semble ne retenir que le nom de la dernière ligne sélectionnée :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
For i = 1 To fichiers.ListCount
'si ligne sélectionnée
    If fichiers.Selected(i) Then
'récupération du nom du fichier
      Varfichier = Replace(fichiers.FileName, ".txt", "")
 'renommer la ligne
Name fichiers.Path & "\" & fichiers.FileName As fichiers.Path & "\" & Varfichier & ".old"
 
end if
 
Next i
Comment faire car avec ce code le nom du ficier (fichiers.FileName ) reste en permanence le même et ne change pas, comme si je n'avais que sélectionné la dernière ligne

Merci

Nicolas