ListBox avec fichiers 2: rénommer et supprimer

Mi_

XLDnaute Occasionnel
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!

XLDnaute Barbatruc
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_

XLDnaute Occasionnel
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.
 

Discussions similaires