Discussion :

[Redge04]

Bonjour,

J'ai environ 1500 fichiers à renommer.

Excel va déjà m'aider à avoir une liste des noms existants avant modif et une autre liste des noms que je souhaite avoir au final.

J'avais pensé à un Batch (fichier .bat) sous DOS pour faire la manip, mais peut-être que vu que les listes seront dans Excel, on pourrait le faire en VBA ?

Et c'est là que j'aurais besoin de vous, car en VBA, je n'y connais rien.

Il s'agit simplement de renommer des fichiers sachant qu'on peut comparer le nom dans le dossier informatique avec celui de la liste d'origine dans Excel pour basculer sur le nom de la nouvelle liste Excel toujours, dans le même fichier Excel à priori.

Chaque fichier aura un nom totalement différent des autres. On ne touche pas à l'extension, on ne change que le nom du fichier.

Une idée de comment faire ça ?

Merci beaucoup pour votre aide.

[patricktoulon]

bonsoir
fonction "As"

Code :

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

1
2
3
4
5
6
dim oldname as string ,newname as string 
 
oldname="c:\mondossier\toto.xls"
newname= "c:\mondossier\titi.xls"
 
Name oldname As newname

[kiki29]

Salut, voir l'aide en ligne ou Ici pour Name As, bref bestialement qqch comme ceci :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Option Explicit
 
Sub Tst()
Dim Source As Range
Dim Ancien As String
Dim Nouveau As String
Dim i As Long, n As Long
 
    Set Source = Feuil1.Cells(1, 1).CurrentRegion
    n = Source.Rows.Count
    For i = 1 To n
        Ancien = Feuil1.Cells(i, 1)
        Nouveau = Feuil1.Cells(i, 2)
        Name Ancien As Nouveau
    Next i
End Sub

[Redge04]

Bonjour,

Un immense merci à vous deux pour vos réponses rapides !!

En fait, entre temps je me suis documenté sur les fonctions en DOS (si, si !!) et j'ai trouvé la solution.

Je vais la poster dans la partie du forum réservée aux fichiers .bat (batchs) en dos.

En gros, il suffit d'un fichier texte ayant dedans sur chaque ligne, l'ancien nom, un séparateur (une virgule), le nouveau nom. Ensuite, une commande dos dans un .bat fait le job.

Sujet résolu.

Merci