Comment exporter des commentaires d'Excel vers Word ?

Pour les utilisateurs d'Excel, insérer des commentaires dans les cellules est une tâche courante. Parfois, vous devez copier et coller ces commentaires dans un document Word pour une raison ou une autre. Bien sûr, vous pouvez copier et coller chaque commentaire individuellement dans Word, mais c'est une tâche fastidieuse et chronophage. Existe-t-il un moyen d'exporter tous les commentaires d'Excel vers Word en une seule fois ?

Exporter des commentaires de la feuille de calcul actuelle vers Word avec du code VBA

Exporter des commentaires de la feuille de calcul actuelle vers Word avec du code VBA

Malheureusement, Excel ne propose pas de fonctionnalité permettant de copier et coller tous les commentaires dans Word en une seule fois. Cependant, avec le code VBA suivant, vous pouvez rapidement exporter tous les commentaires de la feuille de calcul active vers le document Word.

1. Maintenez les touches ALT + F11 enfoncées pour ouvrir la fenêtre Microsoft Visual Basic pour Applications.

2. Cliquez sur Insérer > Module, puis collez le code suivant dans la fenêtre Module.

Code VBA : Exporter des commentaires de la feuille de calcul actuelle vers Word

Sub CopyCommentsToWord()
'Update 20140325
Dim xComment As Comment
Dim wApp As Object
On Error Resume Next
Set wApp = GetObject(, "Word.Application")
If Err.Number <> 0 Then
  Err.Clear
  Set wApp = CreateObject("Word.Application")
End If
wApp.Visible = True
wApp.Documents.Add DocumentType:=0
For Each xComment In Application.ActiveSheet.Comments
    wApp.Selection.TypeText xComment.Parent.Address & vbTab & xComment.Text
    wApp.Selection.TypeParagraph
Next
Set wApp = Nothing
End Sub

3. Appuyez ensuite sur la touche F5 pour exécuter ce code, et tous les commentaires de la feuille de calcul active seront exportés vers un nouveau document Word avec leur adresse de cellule respective. Voir capture d'écran :

Articles connexes :

Comment insérer rapidement un commentaire dans plusieurs cellules dans Excel ?

Comment changer la forme de la boîte de commentaires dans Excel ?

Comment modifier tous les formats de commentaires dans les cellules dans Excel ?

Comment changer le nom de l'auteur de tous les commentaires dans Excel ?