Il s'agit d'une macro qui effectue une série d'opérations de recherche/remplacement sur une collection de documents MS Word.
Pour afficher le script en dehors de MS Word, ouvrez FindReplaceAllFiles.bas et helpers.bas dans n'importe quel éditeur de texte.
Installation
La configuration consiste simplement à organiser les fichiers comme indiqué dans SetupDiagram.png :
- FindReplaceMacro.dotm dans le répertoire de travail
- Ayez lookuptable.csv à côté de la macro
- Le format de la table de recherche doit être constitué de deux colonnes, la première étant les chaînes de recherche et la seconde les chaînes de remplacement - voir lookuptable.csv dans ce référentiel par exemple
- Créez un répertoire intitulé Fichiers à côté de la macro et de la table de recherche
- Fichiers contient directement tous les fichiers .docx sur lesquels vous souhaitez exécuter les opérations rechercher/remplacer
- Le fichier de la table de recherche et le répertoire de fichiers ne doivent pas être renommés à partir de ce schéma, sauf si vous souhaitez modifier la macro vous-même.
Courir
L'ouverture de la macro apparaîtra simplement pour ouvrir un document Word. Pour exécuter :
- Vous aurez besoin des macros activées (un paramètre de sécurité)
- Vous aurez besoin de l'onglet développeur activé
- Cliquez sur le bouton Macros dans l'onglet Développeur
- Sélectionnez findReplaceAllFiles et appuyez sur Exécuter
- FilesWithSubs contiendra désormais les fichiers avec les substitutions effectuées. Si le nom du fichier figurait dans la table de substitution, le fichier sera renommé en fonction de la substitution.
Mises à jour futures possibles
- Faire en sorte que l'algorithme recherche récusivement les sous-dossiers des fichiers
