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?
Die besten Produktivitätstools für das Büro
Stärken Sie Ihre Excel-Fähigkeiten mit Kutools für Excel und genießen Sie Effizienz wie nie zuvor. Kutools für Excel bietet mehr als300 erweiterte Funktionen, um die Produktivität zu steigern und Zeit zu sparen. Klicken Sie hier, um die Funktion zu erhalten, die Sie am meisten benötigen...
Office Tab bringt die Tab-Oberfläche in Office und macht Ihre Arbeit wesentlich einfacher
- Aktivieren Sie die Tabulator-Bearbeitung und das Lesen in Word, Excel, PowerPoint, Publisher, Access, Visio und Project.
- Öffnen und erstellen Sie mehrere Dokumente in neuen Tabs innerhalb desselben Fensters, statt in neuen Einzelfenstern.
- Steigert Ihre Produktivität um50 % und reduziert hunderte Mausklicks täglich!
Alle Kutools-Add-Ins. Ein Installationspaket
Das Kutools for Office-Paket bündelt Add-Ins für Excel, Word, Outlook & PowerPoint sowie Office Tab Pro und ist ideal für Teams, die mit mehreren Office-Anwendungen arbeiten.
- All-in-One-Paket — Add-Ins für Excel, Word, Outlook & PowerPoint + Office Tab Pro
- Ein Installationspaket, eine Lizenz — in wenigen Minuten einsatzbereit (MSI-kompatibel)
- Besser gemeinsam — optimierte Produktivität in allen Office-Anwendungen
- 30 Tage kostenlos testen — keine Registrierung, keine Kreditkarte erforderlich
- Bestes Preis-Leistungs-Verhältnis — günstiger als Einzelkauf der Add-Ins