Wie listet man alle Kommentare der aktuellen Arbeitsmappe in einem neuen Arbeitsblatt oder einer neuen Arbeitsmappe in Excel auf?
Wenn Ihre Arbeitsmappe zu viele Kommentare enthält und Sie alle Kommentare zur Überprüfung in einem neuen Arbeitsblatt oder einer neuen Arbeitsmappe auflisten möchten – wie gehen Sie dabei vor? Die folgenden Methoden helfen Ihnen, schnell alle Kommentare eines Arbeitsblatts bzw. einer gesamten Arbeitsmappe in Excel in ein neues Arbeitsblatt oder eine neue Arbeitsmappe zu übertragen.
Verwenden Sie VBA-Code, um alle Kommentare im Aktuelle Arbeitsmappe in ein Neues Arbeitsblatt aufzulisten
Der folgende VBA-Code listet alle Kommentare der aktuellen Arbeitsmappe auf einem neuen Arbeitsblatt auf. Auf diesem neuen Arbeitsblatt werden sämtliche Kommentare der gesamten Arbeitsmappe mit Angaben zu Arbeitsblattnamen, Zelladresse, Kommentarinhalt und Zellnamen übersichtlich dargestellt. Gehen Sie wie folgt vor, um diese Methode anzuwenden:
1. Klicken Sie auf „Entwickler“ > „Visual Basic“. Daraufhin öffnet sich das Fenster „Microsoft Visual Basic for Applications“. Wählen Sie „Einfügen“ > „Modul“ und fügen Sie anschließend den folgenden VBA-Code in das Modul ein.
VBA: Listet alle Kommentare in einem neuen Arbeitsblatt auf.
Sub ShowCommentsAllSheets()
'Update 20140508
Dim commrange As Range
Dim rng As Range
Dim ws As Worksheet
Dim newWs As Worksheet
Set newWs = Application.Worksheets.Add
newWs.Range("A1").Resize(1, 4).Value = Array("Sheet", "Address", "Value", "Comment")
Application.ScreenUpdating = False
On Error Resume Next
For Each ws In Application.ActiveWorkbook.Worksheets
Set commrange = ws.Cells.SpecialCells(xlCellTypeComments)
If Not commrange Is Nothing Then
i = newWs.Cells(Rows.Count, 1).End(xlUp).Row
For Each rng In commrange
i = i + 1
newWs.Cells(i, 1).Resize(1, 4).Value = Array(ws.Name, rng.Address, rng.Value, rng.Comment.Text)
Next
End If
Set commrange = Nothing
Next
newWs.Cells.WrapText = False
Application.ScreenUpdating = True
End Sub
2. Klicken Sie anschließend auf die 
-Schaltfläche, um den Code auszuführen. Danach erhalten Sie ein neues Arbeitsblatt mit allen Kommentaren aus der aktuellen Arbeitsmappe. Siehe Screenshot:
Verwenden Sie Kutools für Excel, um alle Kommentare im Aktuelle Arbeitsmappe in ein Neues Arbeitsblatt oder eine Arbeitsmappe aufzulisten
Mithilfe der Funktion „Kommentarliste erstellen“ von Kutools für Excel können Sie alle Kommentare schnell in ein neues Arbeitsblatt exportieren.
Kutools für Excel: Über 300 praktische Excel-Add-Ins – kostenlos und uneingeschränkt 30 Tage lang testen.Jetzt herunterladen.
1. Wenn Sie Kutools für Excel installiert haben, klicken Sie auf „Kutools“ > „Mehr“ > „Kommentarliste erstellen“.
2. Im Dialogfeld „Kommentarliste erstellen“:
- Wählen Sie den Bereich aus, für den Sie die Kommentare anzeigen möchten – entweder „Aktuelles Arbeitsblatt“ oder „Alle Arbeitsblätter“.
- Geben Sie anschließend den Ort an, an dem die Kommentarliste platziert werden soll. Sie können die Kommentare entweder in einem neuen Arbeitsblatt oder auf einem neuen Arbeitsblatt auflisten. Siehe Screenshot:
3. Klicken Sie anschließend auf die Schaltfläche „Erstellen“. Es wird ein neues Arbeitsblatt hinzugefügt, das alle Kommentare des aktiven Arbeitsblatts zusammen mit ihren Attributen – wie Arbeitsblattname, Zellbezüge sowie Zeile und Spalte – übersichtlich auflistet. Siehe Screenshot:
Weitere Informationen zur Funktion „Kommentarliste erstellen“ finden Sie unter Kommentarliste erstellen – Funktionsbeschreibung.
Verwandte Artikel:
- Ändern Sie alle Kommentarformate in Zellen
- Ändern Sie den Autorennamen aller Kommentare
- Suchen und Ersetzen Text innerhalb von Kommentaren
- Zeigen oder verbergen Sie alle Kommentare und Kommentarindikatoren in Excel
- Konvertieren Sie Zellinhalte in Kommentare in Excel
- Konvertieren Sie Kommentare in Zellinhalte in Excel
Beste Office-Produktivitätstools
Verbessern Sie Ihre Excel-Kenntnisse mit Kutools für Excel und erleben Sie Effizienz wie nie zuvor.Kutools für Excel bietet über 300 erweiterte Funktionen zur Steigerung der Produktivität und Zeit sparen.Klicken Sie hier, um die Funktion zu erhalten, die Sie am dringendsten benötigen...
Office Tab bringt eine tabbasierte Oberfläche in Office und macht Ihre Arbeit viel einfacher
- Aktivieren Sie tabbasiertes Bearbeiten und Lesen in Word, Excel, PowerPoint, Publisher, Access, Visio und Project.
- Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters – statt jedes in einem separaten Fenster zu öffnen.
- Steigert Ihre Produktivität um 50 % und erspart Ihnen täglich Hunderte von Mausklicks!
Alle Kutools-Add-Ins – ein Installationsprogramm
Kutools for Office-Paket bündelt Add-Ins für Excel, Word, Outlook und PowerPoint sowie Office Tab Pro – ideal für Teams, die mit mehreren Office-Anwendungen arbeiten.
- Alles-in-einem-Paket— Add-Ins für Excel, Word, Outlook & PowerPoint sowie Office Tab Pro
- Ein Installationsprogramm, eine Lizenz— innerhalb weniger Minuten eingerichtet (MSI-fähig)
- Funktioniert besser zusammen— optimierte Produktivität über alle Office-Anwendungen hinweg
- 30-tägige Vollversion zum Testen— keine Registrierung, keine Kreditkarte erforderlich
- Bestes Preis-Leistungs-Verhältnis— sparen Sie im Vergleich zum Kauf einzelner Add-Ins