Wie exportiert man Kommentare von Excel nach Word?

Für Excel-Benutzer ist das Einfügen von Kommentaren in Zellen eine gängige Aufgabe. Manchmal müssen Sie diese Kommentare aus einem bestimmten Grund in ein Word-Dokument kopieren und einfügen. Natürlich könnten Sie die Kommentare einzeln in Word einfügen, aber das wäre eine mühsame und zeitaufwändige Arbeit. Gibt es eine Möglichkeit, alle Kommentare auf einmal von Excel nach Word zu exportieren?

Kommentare aus dem aktuellen Arbeitsblatt mit VBA-Code nach Word exportieren

Kommentare aus dem aktuellen Arbeitsblatt mit VBA-Code nach Word exportieren

Leider bietet Excel keine Funktion an, um alle Kommentare auf einmal nach Word zu kopieren. Mit dem folgenden VBA-Code können Sie jedoch schnell alle Kommentare des aktiven Arbeitsblatts in ein Word-Dokument exportieren.

1. Halten Sie die Tasten ALT + F11 gedrückt, um das Fenster Microsoft Visual Basic for Applications zu öffnen.

2. Klicken Sie auf Einfügen > Modul und fügen Sie den folgenden Code im Modulfenster ein.

VBA-Code: Kommentare aus dem aktuellen Arbeitsblatt nach Word exportieren

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. Drücken Sie dann die Taste F5, um diesen Code auszuführen, und alle Kommentare im aktiven Arbeitsblatt werden zusammen mit ihrer Zelladresse in ein neues Word-Dokument exportiert. Siehe Screenshot:

Verwandte Artikel:

Wie fügt man schnell einen Kommentar in mehrere Zellen in Excel ein?

Wie ändert man die Form des Kommentarfelds in Excel?

Wie ändert man alle Kommentarformate in den Zellen in Excel?

Wie ändert man den Namen aller Kommentarautoren in Excel?