ListBox avec fichiers 2: rénommer et supprimer

[Mi_]

Bonjour le forum,

Un ListBox qui récupère la liste des fichiers d'un dossier donné, c'est déjà vu. La possibilité de sélectionner et d'ouvrir un fichier ainsi trouvé, c'est déjà vu aussi.

Mais comment y faire pour rénommer ou supprimer les fichiers qui sont filtrés par ces ListBox, dans les UserForms ?

Merci de me supporter, et merci pour toute aide,
Mi_

 

[myDearFriend!]

Bonsoir Mi_,


Pour renommer un fichier   :

   Name 'C:\Classeur1.xls' As 'C:\NouvClasseur.xls'

Pour renommer un fichier et le déplacer en même temps :

   Name 'C:\Classeur1.xls' As 'D:\MonDossier\NouvClasseur.xls'

Pour détruire un fichier (Attention! L'effacement est définitif, pas de passage dans la Corbeille Windows !) :

   Kill 'D:\MonDossier\NouvClasseur.xls'

Cordialement,

 

[Mi_]

Bonsoir myDearFriend!,

La question n'est pas comment rénommer ou effacer un fichier par code VBA, mais comment le faire à partir d'un UserForm.ListBox où s'affichent les noms des fichiers présents dans un certain dossier (avec la fonction Application.FileSearch).

Donc avoir à côté du ListBox un bouton Rénommer et un autre Effacer, sélectionner un fichier dans la liste, et hop.