Se connecter avec
S'enregistrer | Connectez-vous

Macro pour renommer fichier avec caractères spéciaux

Dernière réponse : dans Programmation

Bonjour,
Je voudrais créer une macro dans excel 2007 dont la fonction serait la suivante :

1) lister tous les fichiers d'un répertoire et de ses sous-répertoires
2) si les noms de fichiers contiennent des caractères tels que "_", "é", "è"..., je voudrais les remplacer par d'autres caractères acceptés

Quelqu'un a t'il une solution à mon problème

Merci par avance.
Lassé par la pub ? Créez un compte
Expert Programmation

Bonjour,

Nous ne faisons pas de travail à la demande. C'est contraire au règlement !
Nous nous entraidons entre développeurs. Nous acceptons volontiers les débutants.
As-tu déjà un petit quelque chose ?

Non, pas encore, à part quelques idées :

1) lister les fichiers des répertoires
2) tester les caractères qui figurent dans la chaîne de caractères des noms
3) si présence de caractères non désirés, les remplacer par des caractères valides
4) enregistrer dans le répertoire d'origine les nouveaux noms de fihiers

En fait je butte sur les points 1 et 4, les points 2 et 3 me semblent plus accessibles..

Merci pour les infos
Expert Programmation

Pour lister les fichiers, je te propose de ne pas le faire en Basic. Trop archaïque. A la place, utilise la méthode File d'un objet FileSystemObject. Pour enregistrer le fichier, c'est la méthode Move de l'objet File du FileSystemObject, encore lui ;) 

  1. Option Explicit

  1. Dim FSO As FileSystemObject
  2. Dim fic As File
  3.  
  4. Set FSO = CreateObject("FileSystemObject")
  5.  
  6. For Each fic In FSO.Files
  7. ...
  8. fic.Move( ... )
  9. Next
Lassé par la pub ? Créez un compte