Vba: zahl größer als datum

Sie können die folgende grundlegende Syntax in VBA verwenden, um die Anzahl der Daten zu zählen, die größer als ein bestimmtes Datum sind:

 Sub CountifGreaterDate()
Range(" D2 ") = WorksheetFunction.CountIf(Range(" A2:A10 "), ">" & Range(" C2 "))
End Sub

In diesem speziellen Beispiel wird die Anzahl der Daten im Bereich A2:A10 gezählt, die größer als das Datum in Zelle C2 sind.

Das Ergebnis wird dann der Zelle D2 zugewiesen.

Das folgende Beispiel zeigt, wie diese Syntax in der Praxis verwendet wird.

Beispiel: Zählen Sie mit VBA größer als das Datum

Angenommen, wir haben die folgende Datumsliste in Excel und möchten wissen, wie viele Daten größer als der 25.04.2023 sind:

Dazu können wir das folgende Makro erstellen:

 Sub CountifGreaterDate()
Range(" D2 ") = WorksheetFunction.CountIf(Range(" A2:A10 "), ">" & Range(" C2 "))
End Sub

Wenn wir dieses Makro ausführen, erhalten wir die folgende Ausgabe:

Zelle D2 sagt uns, dass es 6 Daten im Bereich A2:A10 gibt, die größer als der 25.04.2023 sind.

Beachten Sie, dass wir den Wert in Zelle C2 ändern und das Makro erneut ausführen können, um die Anzahl der Daten zu zählen, die größer als ein anderes bestimmtes Datum sind.

Angenommen, wir ändern das Datum in Zelle C2 auf den 01.10.2023 und führen das Makro erneut aus:

Wir sehen, dass es drei Daten gibt, die nach dem 01.10.2023 liegen.

Hinweis: Wenn Sie die Anzahl der Daten zählen möchten , die größer oder gleich einem bestimmten Datum sind, ersetzen Sie einfach das „>“ in der CountIf- Funktion durch „>=“ .

Zusätzliche Ressourcen

In den folgenden Tutorials wird erläutert, wie Sie andere häufige Aufgaben in VBA ausführen:

So sortieren Sie in VBA nach Datum
So fügen Sie „if“ zwischen zwei Daten in VBA hinzu
So fügen Sie in VBA aktuelle Tage hinzu