Comment remplacer un texte dans plusieurs fichiers Word ?

Pour rechercher et remplacer dans plusieurs fichiers Word, vous pouvez utiliser un script VBA :

Prérequis : activer le mode développeur Word.

• Téléchargez et décompressez le fichier ZIP qui contient le script VBA.
• Ouvrez un document Word.
• Cliquez sur le menu Développeur.
• Cliquez sur l'icône Visual Basic.
• Cliquez sur le menu Fichier puis Importez un fichier.
• Sélectionnez le fichier remplacer_word.bas préalablement décompressé.
• Double cliquez sur Remplacer pour afficher le code VBA.
• Cliquez sur l'icône verte Lecture.
• Si on vous le demande; cliquez sur le bouton Exécuter.
• Sélectionnez les fichiers Word, puis cliquez sur OK.
• Saisissez le texte à rechercher.
• Saisissez le texte de remplacement.

Une fois que le message Opération terminée s'affiche, les textes ont été remplacés dans les fichiers Word que vous avez préalablement sélectionné.

Remarque : vous noterez la ligne de code ci-après, elle limite le nombre de fichiers à 1000 ; si nécessaire vous pouvez la modifier.

Dim xFileDialog As FileDialog, GetStr(1 To 1000) As String