Renommage en masse de fichiers V1

[crocrocro]

crocrocro a soumis une nouvelle ressource:

Renommage en masse de fichiers - Diverses fonctions de fonctions de renommage en masse des fichiers d'un répertoire

Le fichier Excel propose un ensemble de fonctions de renommage en masse des fichiers d'un répertoire.
17 fonctions sont actuellement disponibles (dont Préfixer, Suffixer, Incrémenter, Majuscule, Minuscule, Nom Propre, Remplacer une chaine, Changer le Format de Date ...)
Le renommage s'effectue en 3 étapes à partir de l'Onglet "Menu" :
1- : Sélectionner le répertoire où se trouvent les fichiers à renommer
2- : Calculer les nouveaux noms à partir de la fonction de renommage sélectionnée et des...

En savoir plus sur cette ressource...

 

[crocrocro]

crocrocro a mis à jour Renommage en masse de fichiers avec une nouvelle entrée de mise à jour:

Renommage en masse de fichiers

Sur la version précédente, le code VBA de la feuille "Menu" avait disparu, rendant incatif les clics sur les différents boutons

Lire le reste de cette entrée de mise à jour...

 

[crocrocro]

Bonjour,
ce message s'adresse à ceux qui ont déjà téléchargé le fichier :
En attendant la validation par le modérateur de la correction que j'ai effectuée lundi, le code VBA ci-dessous doit être copié dans le code VBA de la feuille Feuil24111111(Menu).
Je ne sais pour quelle raison (bug excel ?), ce code a été placé dans la version en cours sur l'objet Feuil2411111.
Sans cette correction, l'activation des boutons de la feuille Menu n'ont aucune action

Private Sub BoutonListeFic_Click()
    SelectionnerFichiers
End Sub

Private Sub BoutonNouveauxNoms_Click()
    NouveauxNoms
End Sub

Private Sub BoutonRenommer_Click()
    RenommerFichier
End Sub

 

[Alml]

Bonjour, je ne m'y connais pas du tout en macro mais j'ai vraiment besoin d'une solution afin de renommer des fichiers pdf en masse. Cependant je rencontre une erreur d'exécution "53" avec fichiers introuvables à chaque fois. Je ne comprend pas d'où vient l'erreur sachant que la macro arrive à bien récupérer mes fichiers d'un dossiers... si quelqu'un peut m'aider cela me serait vraiment utile

 

[crocrocro]

Bonjour Alml,
difficile de pouvoir vous aider efficacement sans avoir plus de détail.
L'erreur 53 correspond à un fichier introuvable.
Je suppose que la ligne du code VBA qui génère l'erreur d'exécution est la suivante

Name ancienNomComplet As nouveauNomComplet

J'ai bien une piste :
Vous avez cliqué sur le bouton "Renommer les Fichiers Dans les Répertoires" puis éventuellement fait quelques modifications sur la feuille et cliqué à nouveau le bouton "Renommer les Fichiers Dans les Répertoires".
Si c'est le cas, c'est normal :
au 2ème clic, la macro va renommer des fichiers déjà renommés et ne les retrouvent donc pas.
Pour éviter cela, voir le mode opératoire Etape 2 de la feuille Mode Opératoire.
Sinon, merci de m'indiquer en détail tout le mode opératoire et éventuellement fournir le fichier au moment où se produit l'erreur.

 

[michelf]

Bonjour, je ne sais pas si c'est bien la place pour poser cette question ?
Voila, j'ai quelques centaines de fichiers vidéos et photos à renommer en vue d'un classement par date.
J'aimerais donc que tous mes fichiers commencent par date heure min sec genre: "yyyymmddhhmmss-img_1234.---".
J'ai essayé des petits logiciels type "renamer" mais ça ne fonctionne pas.
Y a-t-il moyen avec Excel d'extraire ces metadonnées" pour renommer mes fichiers comme désiré.
Merci de vote attention

 

[crocrocro]

Bonjour Michel,
oui, voir ma réponse à cette discussion https://excel-downloads.com/threads/fonction-pour-obtenir-taille-fichier-auteur.20082973/
Et ensuite en jouant sur mon fichier pour renommer, il est possible de faire ce que vous souhaitez.
Si besoin d'aide complémentaire, je peux peut-être vous aider

 

[crocrocro]

Je reviens sur ma réponse précédente :
j'ai supposé que vous souhaitiez indiquer comme date celle de la prise de vue de la photo.
Si c'est juste une date (la même pour l'ensemble des photos) c'est encore plus simple et peut être effectué en 1 étape avec mon fichier :
Sélectionner Préfixer avec pour Paramètre 1 : 20240517_185115_
Le résultat pour des fichiers nommés initialement image1.jpeg image2.jpeg :
20240517_185115_image1.jpeg
20240517_185115_image2.jpeg
etc...