Comment modifier le nom de l’auteur de tous les commentaires dans Excel ?

Lorsque vous insérez un commentaire dans une feuille de calcul, Excel ajoute automatiquement le nom de l’auteur suivi de deux-points. Il peut arriver que vous souhaitiez modifier ce nom. Comment faire ? Découvrez ici les différentes méthodes pour changer le nom de l’auteur d’un commentaire dans Excel.

Modifier le nom d’auteur par défaut de tous les Nouveau commentaire en configurant les options Excel

Modifiez rapidement le nom de l’auteur de tous les commentaires existants dans la feuille active ou dans toutes les feuilles avec Kutools pour Excel

Modifier le nom d’auteur de tous les commentaires existants dans tout le classeur à l’aide d’un code VBA

Modifiez le nom d’auteur par défaut de tous les Nouveau commentaire en configurant les options Excel

Vous pouvez modifier le nom d’utilisateur Excel pour changer le nom de l’auteur de tous les nouveaux commentaires que vous insérerez.

1. Cliquez sur Fichier > Options dans Excel 2010/2013/2016, ou cliquez sur le bouton Office > Options Excel > Général dans Excel 2007.

2. Dans la boîte de dialogue Options Excel, cliquez sur Général dans la barre de gauche, faites défiler jusqu’à la section Personnaliser votre copie de Microsoft Office dans le volet de droite, puis remplacez l’ancien Nom d'utilisateur par le nouveau de votre choix. Cliquez enfin sur le bouton OKVoir la capture d’écran :

Désormais, lorsque vous insérerez des Nouveau commentaire dans votre feuille de calcul, le nom de l’auteur sera celui que vous avez spécifié ci-dessus. Toutefois, les anciens commentaires conserveront leur ancien nom d’auteur.

Modifiez facilement le nom de l’auteur de tous les commentaires existants par un nouveau avec Kutools pour Excel

Outre la méthode ci-dessus, je vous recommande l’utilitaire Supprimer/Ajouter Nom d'utilisateur dans les commentaires de Kutools pour Excel. Grâce à cet outil, vous pouvez facilement remplacer le nom de l’auteur de tous les commentaires existants par celui de votre choix, non seulement dans la feuille de calcul active, mais aussi dans tout le classeur.

1. Passez à la feuille dans laquelle vous souhaitez modifier le nom de l’auteur de tous les commentaires, puis cliquez sur Kutools > Plus > Supprimer/Ajouter Nom d'utilisateur dans les commentaires. Voir la capture d’écran :

2. Dans la boîte de dialogue Supprimer/Ajouter le nom d’utilisateur dans les commentaires, procédez comme suit :

Commencez par supprimer le nom de l’auteur de tous les commentaires dans Portée d'action.

• (1) Dans la liste déroulante Portée, si vous souhaitez modifier uniquement les noms d’auteurs dans la Feuille de calcul actuelle, sélectionnez cette option. Pour modifier les noms d’auteurs dans tout le classeur, sélectionnez l’option Toutes les feuilles.
• (2) Choisissez l’option Supprimer le nom d’utilisateur des commentaires.
• (3) Cliquez sur le bouton Appliquer.
• (4) Dans la boîte de dialogue qui s’ouvre, cliquez sur le bouton OK.

Ensuite, ajoutez le nouveau nom de l’auteur à tous les commentaires dans Portée d'action.

• (1) Saisissez le nouveau nom d’auteur des commentaires dans la zone Nom d'utilisateur, puis choisissez l’option Ajouter Nom d'utilisateur aux commentaires;
• (2) Cliquez sur le bouton Appliquer;
• (3) Dans la boîte de dialogue qui s’ouvre, cliquez sur le bouton OK;
• (4) Cliquez sur le bouton Fermer pour fermer la boîte de dialogue.

Utiliser un code VBA pour convertir tous les nombres négatifs d’une plage en positifs

Si vous souhaitez modifier le nom de l’auteur de tous les commentaires existants dans tout le classeur, le code VBA ci-dessous vous aidera :

1. Appuyez simultanément sur les touches Alt + F11 pour ouvrir Microsoft Visual Basic pour Applications. Dans la fenêtre Microsoft Visual Basic pour Applications, cliquez sur Insertion > Module, puis copiez-collez le code suivant dans la fenêtre du module :

Code VBA : Modifier le nom de l’auteur de tous les commentaires existants dans tout le classeur

Sub ChangeCommentName()
'Updateby20140509
Dim xWs As Worksheet
Dim xComment As Comment
Dim oldName As String
Dim newName As String
xTitleId = "KutoolsforExcel"
oldName = InputBox("Old Name", xTitleId, Application.UserName)
newName = InputBox("New Name", xTitleId, "")
For Each xWs In Application.ActiveWorkbook.Worksheets
    For Each xComment In xWs.Comments
        xComment.Text (Replace(xComment.Text, oldName, newName))
    Next
Next
End Sub 

2. Appuyez sur la touche F5 pour exécuter le code. Une boîte de dialogue KutoolsforExcel s’ouvre alors, affichant l’ancien nom de l’auteur des commentaires dans la zone de texte. Cliquez sur le bouton OK. Voir la capture d’écran :

3. Une autre boîte de dialogue Kutools for Excel s’ouvre alors. Saisissez le nom d’auteur souhaité pour les nouveaux commentaires dans la zone de texte, puis cliquez sur le bouton OK. Voir la capture d’écran :

Tous les noms d’auteur des commentaires existants sont désormais immédiatement remplacés par le Nouveau nom dans tout le classeur.

Remarque : Cette méthode ne s’applique pas aux nouveaux commentaires que vous insérez.

Démo : Modifier le nom de l’auteur de tous les commentaires avec Kutools pour Excel

Articles associés