Comment modifier le nom de l'auteur affiché dans les commentaires Word

Cet article explique comment modifier le nom d'auteur par défaut utilisé pour les commentaires dans Word, ainsi que comment mettre à jour le nom d'auteur des commentaires existants dans un document. Vous pouvez le faire via les paramètres intégrés de Word ou une macro VBA.

Modifier le nom de l'auteur par défaut pour les nouveaux commentaires

Modifier le nom de l'auteur des commentaires existants dans un document

Modifier le nom de l'auteur par défaut pour les nouveaux commentaires

Si vous souhaitez que les nouveaux commentaires affichent un nom d’auteur différent, vous devez modifier le nom d’utilisateur dans les paramètres des options Word.

1. Ouvrez un document Word, puis cliquez sur « Fichier » > « Options ».
2. Dans la fenêtre « Options Word », accédez à l’onglet « Général ».
3. Modifiez le nom dans la case « Nom d'utilisateur ».
4. Cliquez sur « OK » pour enregistrer la modification.

   

Désormais, tout nouveau commentaire que vous insérez affichera le nom d'utilisateur mis à jour.

Modifier le nom de l'auteur des commentaires existants dans un document

Si vous avez un document avec de nombreux commentaires et que vous devez mettre à jour les noms des auteurs en une seule fois, vous pouvez utiliser une macro VBA pour le faire rapidement.

1. Sélectionnez la plage qui contient les commentaires que vous souhaitez modifier ou appuyez sur « Ctrl + A » pour sélectionner l’intégralité du document.
2. Appuyez sur « Alt + F11 » pour ouvrir la fenêtre Microsoft Visual Basic pour Applications.
3. Dans l'éditeur VBA, cliquez sur « Insertion » > « Module ». Collez ensuite le code VBA suivant dans la fenêtre du module :

   Sub ChangeCommentAuthor()
   'Updated by ExtendOffice 20181112
       Dim I As Long
       Dim xNewName As String
       Dim xShortName As String
       If Selection.Comments.Count = 0 Then
           MsgBox "No comments in your selection!", vbInformation, "Kutools for Word"
           Exit Sub
       End If
       xNewName = InputBox("New author name?", "Kutools for Word")
       xShortName = InputBox("New author initials?", "Kutools for Word")
       If xNewName = "" Or xShortName = "" Then
           MsgBox "The author name/initials can’t be empty.", vbInformation, "Kutools for Word"
           Exit Sub
       End If
       With Selection
           For I = 1 To .Comments.Count
               .Comments(I).Author = xNewName
               .Comments(I).Initial = xShortName
           Next I
       End With
   End Sub

4. Appuyez sur « F5 » pour exécuter la macro. Dans la boîte de dialogue qui apparaît, saisissez le nom du nouvel auteur et cliquez sur « OK ».

   

5. Dans la boîte de dialogue suivante, saisissez les nouvelles initiales et cliquez sur « OK ».

   

Les noms d'auteur de tous les commentaires dans la plage sélectionnée sont désormais mis à jour.

Meilleurs outils de productivité bureautique

Kutools for Word - Élevez votre expérience Word avec Over 100 Caractéristiques remarquables !

🤖 Fonctionnalités d'IA de Kutools: Assistant d'IA / Assistant en temps réel / Super Polish (Format de conservation) / Super Translate (Préserver le format) / Rédaction IA / Relecture par IA

(I.e. Maîtrise des documents: Pages divisées / Fusionner des documents / Exporter la sélection dans différents formats (PDF/TXT/DOC/HTML...) / Conversion par lots en PDF

✏ Édition du contenu: Recherche et remplacement par lots sur plusieurs fichiers / Redimensionner toutes les images / Transposer les lignes et les colonnes du tableau / Convertir le tableau en texte

🧹 Nettoyage sans effort : balayer Espaces supplémentaires / Sauts de section / Boîtes de texte / Liens hypertextes / Pour plus d'outils de suppression, rendez-vous sur Effacer grouper...

➕ Insertions créatives: Insérer Mille séparateurs / Cases à cocher / Boutons radio / code QR / Code barres / Plusieurs images / Découvrez-en davantage dans le insérer grouper...

🔍 Sélections de précision: Localiser Pages spécifiques / Tables / Formes / Titre des paragraphes / Améliorez la navigation avec plus Pour plus d'information Caractéristiques

⭐ Améliorations des étoiles: Accédez à n'importe quel emplacement / Insérer automatiquement du texte répétitif / Basculer entre les fenêtres de document / 11 Conversion Outils

???? Prend en charge plus de 40 langues:Utilisez Kutools dans votre langue préférée – prend en charge l'anglais, l'espagnol, l'allemand, le français, le chinois et plus de 40 autres !

👉 Vous voulez essayer ces fonctionnalités ? Téléchargez Kutools pour Word maintenant ! 🚀

Téléchargement gratuit     Acheter maintenant     En savoir plus sur Kutools pour Word

 

Meilleurs outils de productivité bureautique

Kutools for Word - 100+ outils pour Word

• 🤖 Fonctionnalités d'IA de Kutools: Assistant d'IA / Assistant en temps réel / Super polonais / Super Traduire / Rédaction IA / Relecture par IA
• (I.e. Maîtrise des documents: Pages divisées / Fusionner des documents / Conversion par lots en PDF
• ✏ Édition du contenu: Rechercher et remplacer par lots / Redimensionner toutes les images
• 🧹 Nettoyage sans effort: Supprimer les espaces supplémentaires / Supprimer les sauts de section
• ➕ Insertions créatives: Insérer des milliers de séparateurs / Insérer des cases à cocher / Créer des codes QR
• ???? Prend en charge plus de 40 langues: Kutools parle votre langue – plus de 40 langues prises en charge !

Téléchargement gratuit Acheter maintenant En savoir plus sur Kutools