Zum Hauptinhalt springen

Wie zählt man, wenn Zellen ein beliebiges Datum/Daten enthalten in Excel?

Author: Kelly Last Modified: 2025-05-28

Haben Sie jemals Probleme gehabt, die Anzahl der Zellen zu zählen, die ein beliebiges Datum oder Daten in einem bestimmten Bereich in Excel enthalten? In diesem Artikel stelle ich Methoden vor, um zu zählen, wenn Zellen ein beliebiges Datum/Daten in Excel enthalten.


Zählen, wenn Zellen ein beliebiges Datum in Excel enthalten

Diese Methode führt ein VBA-Makro ein, um Zellen zu zählen, die Datumsangaben in einem bestimmten Bereich in Excel enthalten.

Schritt 1: Öffnen Sie das Microsoft Visual Basic for Applications-Fenster, indem Sie gleichzeitig die Tasten Alt + F11 drücken.

Schritt 2: Klicken Sie auf Einfügen > Modul, und fügen Sie dann den folgenden VBA-Code in das Modulfenster ein:

VBA: Zählen, wenn Zellen ein beliebiges Datum enthalten

Function TypeCell(pRange As Range) As Variant

Dim xArr() As Variant
Dim xRng As Range
Application.Volatile
ReDim xArr(pRange.Cells.Count - 1) As Variant
xCount = 0
For Each xRng In pRange
xArr(xCount) = VarType(xRng)
xCount = xCount + 1
Next
TypeCell = xArr
End Function

Schritt 3: Geben Sie in einer leeren Zelle die Formel =SUMME(WENN(TypeCell(A1:E15)=7;1;0)) ein, und drücken Sie dann gleichzeitig die Tasten Strg + Umschalt + Enter.

Hinweis: In der Formel =SUMME(WENN(TypeCell(A1:E15)=7;1;0)) ist A1:E15 der spezifische Bereich, in dem wir die Anzahl der Zellen mit Datumsangaben zählen werden. Sie können ihn je nach Bedarf ändern.

Jetzt erhalten Sie die Anzahl der Zellen mit Datumsangaben im spezifischen Bereich.

Einfaches Auswählen und Zählen beliebiger Datumszellen, wenn die Daten zwischen zwei Daten liegen in Excel

Wenn Sie Kutools für Excel installiert haben, können Sie seine Spezialzellen auswählen Funktion verwenden, um schnell beliebige Datumszellen auszuwählen und zu zählen, wenn die Daten in einem bestimmten Datumsbereich liegen.


Kutools' Select Special Cells feature's interface and use case example

Kutools für Excel - Verleihen Sie Excel mit über 300 essenziellen Tools einen echten Schub. Nutzen Sie dauerhaft kostenlose KI-Funktionen! Holen Sie es sich jetzt

Zählen, wenn Zellen mit der COUNTA-Funktion in Excel Daten enthalten

Die COUNTA-Funktion hilft Ihnen dabei, die Anzahl der Zellen mit Daten in einem bestimmten Bereich in Excel einfach herauszufinden.

Geben Sie in einer leeren Zelle die Formel =COUNTA(A1:E15) ein, und drücken Sie die Eingabetaste. In der Formel ist der Bereich A1:E15 der spezifische Bereich, in dem Sie die Anzahl der Zellen mit Daten zählen werden, und Sie können ihn bei Bedarf ändern.

Hinweis: Nachdem Sie den spezifischen Bereich ausgewählt haben, können wir die Zellenanzahl mit Daten auch leicht in der Statusleiste ablesen.

Count of non-blank cells within the selection on the Status Bar 


Zählen und Auswählen von Zellen, wenn sie Daten in einem angegebenen Bereich enthalten

Wenn Sie Kutools für Excel installiert haben, können Sie dessen Funktion Nicht leere Zellen auswählen verwenden, um Zellen zu zählen und auszuwählen, wenn sie Daten in einem bestimmten Bereich enthalten – und das mit nur einem Klick.

Kutools für Excel - Mit über 300 essenziellen Tools für Excel. Nutzen Sie dauerhaft kostenlose KI-Funktionen! Laden Sie es jetzt herunter!

Wählen Sie den Bereich aus, in dem Sie Zellen zählen möchten, wenn sie Daten enthalten, und klicken Sie auf Kutools > Auswählen > Nicht leere Zellen auswählen. Siehe Screenshot:
Select Nonblank Cells option on the Kutools tab on the ribbon

Dann werden alle Zellen mit Daten im angegebenen Bereich ausgewählt, und ein Dialogfeld wird angezeigt, das zeigt, wie viele nicht leere Zellen ausgewählt wurden. Siehe Screenshot:
Success dialog

Kutools für Excel - Verleihen Sie Excel mit über 300 essenziellen Tools einen echten Schub. Nutzen Sie dauerhaft kostenlose KI-Funktionen! Holen Sie es sich jetzt

Klicken Sie auf die Schaltfläche OK, um dieses Dialogfeld zu schließen.


Demo: Zählen und Auswählen von Zellen, wenn sie Daten in einem angegebenen Bereich enthalten

Kutools für Excel: Über 300 praktische Werkzeuge stehen Ihnen zur Verfügung! Nutzen Sie dauerhaft kostenlose KI-Funktionen! Jetzt herunterladen!

Verwandte Artikel

Beste Büroproduktivitätswerkzeuge

🤖 Kutools AI-Assistent: Revolutionieren Sie die Datenanalyse basierend auf: Intelligente Ausführung   |  Code generieren  |  Benutzerdefinierte Formeln erstellen  |  Daten analysieren und Diagramme generieren  |  Erweiterte Funktionen aufrufen
Beliebte Funktionen: Finden, Hervorheben oder Doppelte markieren   |  Leere Zeilen löschen   |  Spalten oder Zellen kombinieren ohne Datenverlust   |   Runden ...
Erweiterte SVERWEIS: Mehrfachkriterien SVERWEIS    Mehrfachwert SVERWEIS  |   Mehrblatt-SVERWEIS   |   Fuzzy Match ....
Erweiterte Dropdown-Liste: Schnell Dropdown-Liste erstellen   |  Abhängige Dropdown-Liste   |  Mehrfachauswahl Dropdown-Liste ....
Spaltenmanager: Eine bestimmte Anzahl von Spalten hinzufügen  |  Spalten verschieben  |  Sichtbarkeitsstatus ausgeblendeter Spalten umschalten  |  Bereiche & Spalten vergleichen ...
Hervorgehobene Funktionen: Gitterfokus   |  Entwurfsansicht   |   Erweiterte Formelleiste    Arbeitsmappe & Arbeitsblatt-Manager   |  AutoText-Bibliothek (Auto Text)   |  Datumsauswahl   |  Daten zusammenführen   |  Zellen verschlüsseln/entschlüsseln    E-Mail senden nach Liste   |  Spezialfilter   |   Spezialfilter (Filtern fett/kursiv/durchgestrichen...) ...
Top15 Werkzeugsets12 Textwerkzeuge (Text hinzufügen, Bestimmte Zeichen löschen, ...)   |   50+ Diagramm typen (Gantt-Diagramm, ...)   |   40+ Praktische Formeln (Alter basierend auf dem Geburtsdatum berechnen, ...)   |   19 Einfügewerkzeuge (QR-Code einfügen, Bild aus Pfad einfügen, ...)   |   12 Konvertierungswerkzeuge (In Wörter umwandeln, Währungsumrechnung, ...)   |   7 Konsolidieren & Aufteilen Werkzeuge (Erweiterte Zeilen zusammenführen, Zellen aufteilen, ...)   |   ... und mehr

Verbessern Sie Ihre Excel-Fähigkeiten mit Kutools für Excel und erleben Sie Effizienz wie nie zuvor. Kutools für Excel bietet über300 erweiterte Funktionen zur Steigerung der Produktivität und Zeitersparnis.  Klicken Sie hier, um die Funktion zu erhalten, die Sie am meisten benötigen...


Office Tab bringt eine Registerkartenoberfläche zu Office und macht Ihre Arbeit viel einfacher

  • Aktivieren Sie die Bearbeitung und das Lesen mit Registerkarten in Word, Excel, PowerPoint, Publisher, Access, Visio und Project.
  • Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters, anstatt in neuen Fenstern.
  • Steigert Ihre Produktivität um50 % und reduziert täglich hunderte von Mausklicks für Sie!