Wie zähle ich die Anzahl der Zellen mit Kommentaren in Excel?
Haben Sie jemals versucht, die Anzahl der Kommentare in einem Arbeitsblatt zu zählen? In diesem Artikel stelle ich Ihnen einige schnelle Tricks vor, um zu zählen, wie viele Zellen mit Kommentaren in einem Arbeitsblatt enthalten sind.
Zählen Sie die Anzahl der Zellen, die Kommentare enthalten, mit der Funktion Gehe zu Spezial
Zählen Sie die Anzahl der Zellen, die Kommentare mit der benutzerdefinierten Funktion enthalten
Zählen Sie die Anzahl der Zellen, die Kommentare mit VBA-Code enthalten
Zählen Sie die Anzahl der Zellen, die Kommentare enthalten, mit der Funktion Gehe zu Spezial
Mit der Gehe zu Spezial In Excel können Sie zuerst alle Kommentarzellen auswählen und dann die Zählnummer in der Statusleiste anzeigen.
1. Gehe zu klicken Home > Suchen & Auswählen > Gehe zu Spezial, siehe Screenshot:
2. In dem Gehe zu Spezial Dialogfeld, bitte überprüfen Ihre Nachricht Option unter Auswählen Abschnitt, siehe Screenshot:
3. Dann klick OK Klicken Sie auf die Schaltfläche, um diesen Dialog zu schließen, und alle Zellen im aktiven Arbeitsblatt, die den Kommentar enthalten, wurden gleichzeitig ausgewählt. Die Anzahl der Kommentare erhalten Sie in der Statusleiste. Siehe Screenshot:
Hinweis: Wenn Sie leere Zellen mit Kommentaren haben, werden die Kommentare zu leeren Zellen nicht gezählt.
TIPP: Sie können auch drücken Strg + G Verknüpfungen zum Öffnen Gehe zu Dialog, und klicken Sie auf Spezial Schaltfläche zum Anzeigen Gehe zu Spezial Dialog.
Zählen Sie die Anzahl der Zellen, die Kommentare mit der benutzerdefinierten Funktion enthalten
Die obige Methode hat ihren eigenen Nachteil, daher können wir eine benutzerdefinierte Funktion erstellen, um alle Zellkommentare einschließlich der leeren Zellkommentare zu zählen.
1. Halten Sie die Taste gedrückt ALT + F11 Tasten, und es öffnet die Microsoft Visual Basic für Applikationen-Fenster.
2. Klicken Sie Insert > Modulund fügen Sie den folgenden Code in das Feld ein Modulfenster.
VBA-Code: Anzahl der Zellen mit Kommentar zählen
Function CountComments(xCell As Range)
'Update 20140924
Application.Volatile
CountComments = xCell.Parent.Comments.Count
End Function
3. Speichern und schließen Sie dann den Code, kehren Sie zum Arbeitsblatt zurück. Geben Sie in eine leere Zelle die folgende Formel ein: = Zählkommentare (A1), (A1 ist eine Zellreferenz, Sie können sie in eine andere Zelladresse ändern), siehe Screenshot:
4. Dann drücken Enter Taste, und Sie erhalten die Anzahl der Zellenkommentare.
Zählen Sie die Anzahl der Zellen, die Kommentare mit VBA-Code enthalten
Der folgende VBA-Code kann Ihnen auch dabei helfen, alle Zellenkommentare einschließlich der leeren Zellenkommentare zu zählen.
1. Halten Sie die Taste gedrückt ALT + F11 Tasten, und es öffnet die Microsoft Visual Basic für Applikationen-Fenster.
2. Klicken Sie Insert > Modulund fügen Sie den folgenden Code in das Feld ein Modulfenster.
VBA-Code: Anzahl der Zellen mit Kommentar zählen
Sub CountComments()
'Update 20140924
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Set WorkRng = WorkRng.SpecialCells(xlCellTypeComments)
If VBA.Err > 0 Then
MsgBox 0
Else
MsgBox WorkRng.Count
End If
End Sub
3. Dann drücken F5 Wenn Sie die Taste drücken, um diesen Code auszuführen, wird ein Eingabeaufforderungsfeld angezeigt, das Sie daran erinnert, einen Datenbereich auszuwählen, in dem Sie die Zellenkommentare zählen möchten. Siehe Screenshot:
4. Und dann klick OKerhalten Sie die Anzahl der Zellkommentare in der Auswahl.
In Verbindung stehende Artikel:
Wie finde und ersetze ich Text in Kommentaren in Excel?
Wie füge ich schnell einen Kommentar in mehrere Zellen in Excel ein?
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, 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 Oberfläche mit Registerkarten in Office und erleichtert Ihnen die Arbeit erheblich
- Aktivieren Sie das Bearbeiten und Lesen von Registerkarten in Word, Excel und PowerPoint, Publisher, Access, Visio und Project.
- Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters und nicht in neuen Fenstern.
- Steigert Ihre Produktivität um 50 % und reduziert jeden Tag Hunderte von Mausklicks für Sie!