excelliens... bonsoir!
j'ai fait une petite macro pour renommer des images en ajoutant du texte devant le nom du fichier
par exemple nom source: toto.jpg
que je veux renommer: atoto.jpg
en rajoutant "a" devant
rien de compliqué mais ce qui me dépasse c'est que selon le texte que je rajoute devant ça marche ou non...!
mon code:
Dim nom As String, lettre As String
Dim fs, dossier, fichiers, f
Set fs = CreateObject("Scripting.FileSystemObject")
Set dossier = fs.GetFolder(Range("A1"))
Set fichiers = dossier.Files
For Each f In fichiers
f.Name = "a" & f.Name
'f.Name = "r" & f.Name
Next f
si je rajoute "a" devant ça marche
si je rajoute "r" devant il me le met 198 fois devant !! (pour chaque fichier, et encore il s'arrête et bug mais je sens qu'il continuerait bien un peu...)
comme ce que j'ajoute devant est un peu compliqué j'aimerais comprendre ce qui se passe pour arriver à mettre mon texte correctement
la cellule a1 donne le chemin du dossier où je mets mes fichiers images jpg
si d'aventure quelqu'un avait une idée...
grand merci d'avance pour votre aide
amicalement
j'ai fait une petite macro pour renommer des images en ajoutant du texte devant le nom du fichier
par exemple nom source: toto.jpg
que je veux renommer: atoto.jpg
en rajoutant "a" devant
rien de compliqué mais ce qui me dépasse c'est que selon le texte que je rajoute devant ça marche ou non...!
mon code:
Dim nom As String, lettre As String
Dim fs, dossier, fichiers, f
Set fs = CreateObject("Scripting.FileSystemObject")
Set dossier = fs.GetFolder(Range("A1"))
Set fichiers = dossier.Files
For Each f In fichiers
f.Name = "a" & f.Name
'f.Name = "r" & f.Name
Next f
si je rajoute "a" devant ça marche
si je rajoute "r" devant il me le met 198 fois devant !! (pour chaque fichier, et encore il s'arrête et bug mais je sens qu'il continuerait bien un peu...)
comme ce que j'ajoute devant est un peu compliqué j'aimerais comprendre ce qui se passe pour arriver à mettre mon texte correctement
la cellule a1 donne le chemin du dossier où je mets mes fichiers images jpg
si d'aventure quelqu'un avait une idée...
grand merci d'avance pour votre aide
amicalement