Discussion :

[johnbobby]

Bonjour,

Je suis à la recherche d'un script qui pour un dossier que l'on défini en variable,

renomme tous les fichiers
MON_TEST-000000-0000-18_05_2011.pdf

en

99-000000-0000-18_05_2011.pdf

En clair, on remplace MON_TEST par 99 qui est une variable. mais ça ne sera pas toujours nommé MON_TEST. L'idéal serait d'arriver à dire au script tu enlèves tout ce qui est avant le premier - et tu le remplace par 99 (qu'on déclarerait en constante au début du script).

Si quelqu'un aurait un script s'y approchant ce serait top.

Merci d'avance.

[ProgElecT]

Salut

Pour renommer

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
Dim NameFichier1, NameFichier2
Const Remplacement = "99"
NameFichier1 = "MON_TEST-000000-0000-18_05_2011.pdf"
NameFichier2 = "Autre_Nom-100000-0020-19_06_2012.pdf"
 
NameFichier1 = Remplacement & Right(NameFichier1, Len(NameFichier1) - InStr(1, NameFichier1, "-") + 1)
MsgBox NameFichier1
 
NameFichier2 = Remplacement & Right(NameFichier2, Len(NameFichier2) - InStr(1, NameFichier2, "-") + 1)
MsgBox NameFichier2

[johnbobby]

Merci beaucoup pour ta réponse !