Wie kann man alle Kommentare im aktuellen Arbeitsbuch in ein neues Arbeitsblatt oder eine neue Arbeitsmappe in Excel auflisten?
Wenn Sie über eine Arbeitsmappe mit zu vielen Kommentaren verfügen und alle Kommentare zur Überprüfung in ein neues Arbeitsblatt oder eine neue Arbeitsmappe auflisten möchten, wie können Sie das tun? Die folgenden Methoden helfen Ihnen dabei, schnell alle Kommentare eines Arbeitsblatts / einer Arbeitsmappe in ein neues Arbeitsblatt oder eine neue Arbeitsmappe in Excel aufzulisten.
Verwenden Sie VBA-Code, um alle Kommentare im aktuellen Arbeitsbuch in ein neues Arbeitsblatt aufzulisten.
Der folgende VBA-Code listet alle Kommentare im aktuellen Arbeitsbuch in einem neuen Arbeitsblatt auf. Im neuen Arbeitsblatt werden alle Kommentare des gesamten Arbeitsbuchs in einer Liste mit dem Namen des Arbeitsblatts, der Zelladresse, den Kommentarinhalt und den Zellnamen aufgeführt. Bitte verwenden Sie diese Methode wie folgt:
1. Klicken Sie auf "Entwickler" > "Visual Basic", es öffnet sich das Fenster "Microsoft Visual Basic for Applications". Klicken Sie dann auf "Einfügen" > "Modul" und geben Sie den folgenden VBA-Code im 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 dann auf
, um den Code auszuführen, und Sie erhalten ein neues Arbeitsblatt mit allen Kommentaren im aktuellen Arbeitsbuch. Siehe Screenshot:
Verwenden Sie Kutools für Excel, um alle Kommentare im aktuellen Arbeitsbuch in ein neues Arbeitsblatt oder eine neue Arbeitsmappe aufzulisten.
Mit der Funktion "Kommentarliste erstellen" von "Kutools für Excel" können Sie schnell alle Kommentare in ein neues Arbeitsblatt oder eine neue Arbeitsmappe auflisten.
Kutools für Excel: Mit mehr als 300 praktischen Excel-Add-ins, kostenlos zu testen ohne Einschränkungen für 30 Tage. 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, in dem Sie die Kommentare auflisten möchten. Sie können "Aktuelles Arbeitsblatt" oder "Alle Arbeitsblätter" auswählen.
- Geben Sie dann den Ort an, an dem Sie die Kommentarliste platzieren möchten. Sie können die Kommentare in einer neuen Arbeitsmappe oder einem neuen Arbeitsblatt auflisten, siehe Screenshot:
3. Klicken Sie dann auf die Schaltfläche "Erstellen". Ein neues Arbeitsblatt wird hinzugefügt, um alle aktiven Arbeitsblattkommentare mit seinen Attributen wie Blattname, Zellbezüge, Zeile und Spalte aufzulisten. Siehe Screenshot:
Für weitere detaillierte Informationen zu "Kommentarliste erstellen" besuchen Sie bitte die Funktionsbeschreibung von Kommentarliste erstellen.
Verwandte Artikel:
- Ändern Sie alle Kommentarformate in Zellen.
- Ändern Sie den Autorennamen aller Kommentare.
- Suchen und Ersetzen von Text innerhalb von Kommentaren.
- Alle Kommentare und Kommentarindikatoren in Excel anzeigen oder ausblenden.
- Zellinhalte in Kommentare in Excel konvertieren.
- Kommentare in Zellinhalte in Excel konvertieren.
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