Discussion :

[GBAGO]

Bonjour à tous,

Je suis entrain de manipuler un volume important de répertoires et fichiers.
Chaque fichier se trouve dans répertoire spécifique.
Je souhaite éliminer tous les répertoires et conserver les fichiers. Pour ce faire, je dois concaténer les noms des répertoires successifs et le nom du fichier pour en faire le nouveau nom du fichier.
Par exemple: j'ai le répertoire "c:\mmm\aaa\bb\q\gg\fichier. je dois le transformer ainsi : mmmaaabbqggfichier.
D'autre part, le fichier n'a pas d'extension et je dois ajouter une extension.
La seule application que j'ai à ma disposition est VBA office.
J'arrive à extraire le chemin complet du fichier dans une variable de type string. Mais je n'arrive pas à éliminer les caractères "\" qui séparent les sous-répertoires. Quelle est la commande qui permet de partir un objet de type string comme un tableau?
Je vous remercie d'avance de votre contribution.

Cordialement,

[Jean-Philippe André]

tu peux passer par un replace() en remplacant comme chaine de caractère "\" par ""

[GBAGO]

Je te remercie pour cette commande. Elle permet de résoudre partiellement le problème.

Merci beaucoup.

[cavo789]

Elle permet de résoudre partiellement le problème.

Quel problème te reste-t-il ?

[GBAGO]

Bonjour,

Le deuxième problème est l'extraction du fichier qui se trouve dans le dernier répertoire. Je dois ensuite renommer le nom du fichier extrait en concaténant le nom du répertoire et le nom du fichier et stocker le fichier dans un autre répertoire.
Le dernier problème est le renommage du fichier pour lui donner une extension. Pour ce dernier, la commande name pourra le faire, je pense.
Merci beaucoup pour ta demande d'éclaircissement du problème.

Cordialement.

[zazaraignée]

Moi, je serais curieuse de voir ton code. Utilises-tu le File System Object ?

[GBAGO]

Bonsoir,

Je viens de résoudre finalement le problème.
Je te remercie pour ta contribution.
Je t'informe que j'ai utilisé finalement les méthodes copyfile, getfile pour résoudre les 2 autres questions.
Merci beaucoup.