VBA Count - Zählen Sie numerische Werte mithilfe der Zählfunktion in Excel VBA

Inhaltsverzeichnis

Zählfunktion in VBA Excel

In der VBA-Zählfunktion wird verwendet, um zu zählen, wie viele Zellen Werte enthalten. Wir müssen uns daran erinnern, dass die Zellen mit Zahlen oder Text in doppelten Anführungszeichen oder die Zellen, deren Werte direkt eingegeben werden, gezählt werden die zufälligen Daten haben, die nicht von Excel übersetzt werden können, werden nicht gezählt.

In VBA ist COUNT eine Arbeitsblattfunktion, die über die Arbeitsblattfunktionsklasse angewendet werden kann. Es ist keine eingebaute Funktion. Die VBA COUNT-Funktion kann alle numerischen Werte aus dem angegebenen Wertebereich zählen.

In diesem Artikel zeigen wir Ihnen, wie Sie die COUNT-Funktion in VBA verwenden.

Beispiele für die VBA-Zählfunktion

Nehmen wir einige praktische Beispiele für die VBA-Zählfunktion, um ihre Funktionsweise zu verstehen.

VBA Count Beispiel # 1

Lassen Sie den Code selbst schreiben, um diese COUNT-Funktion in Excel VBA anzuwenden.

Schritt 1: Starten Sie das Makro, indem Sie die Sub-Prozedur starten.

Code:

Sub Count_Example1 () End Sub

Schritt 2: Nun speichern wir das Ergebnis der COUNT-Funktion in Zelle C2. Unser Code sollte also "Range (" C2 ") sein. Value =

Code:

Sub Count_Example1 () Range ("C2"). Value = End Sub

Schritt 3: Da es sich nicht um eine in VBA integrierte Funktion handelt, müssen wir sie über die Worksheet Function-Klasse anwenden. Zugriff über die Arbeitsblatt-Funktionsklasse.

Code:

Sub Count_Example1 () Range ("C2"). Value = Worksheetfunction.Count (End Sub

Schritt 4: Geben Sie nun den Bereich als A1 bis A7 an.

Code:

Sub Count_Example1 () Range ("C2"). Value = WorksheetFunction.Count (Range ("A1: A7")) End Sub

Ok, dies sind drei einfache Schritte, um zum Ergebnis zu gelangen.

Führen Sie nun den Code aus, um das Ergebnis in Zelle C2 anzuzeigen.

Wie üblich haben wir das Ergebnis als 3 erhalten, so wie wir es erhalten haben, als wir die VBA COUNT-Funktion in einem Arbeitsblatt angewendet haben.

Wenn wir die Formelleiste beobachten, haben wir die Formel nicht. Vielmehr haben wir gerade das Ergebnis der Formel erhalten. Um die Formel auf die Zelle C2 anzuwenden, müssen wir unseren Code ändern. Unten finden Sie den Code zum Anwenden der Formel.

Code:

Sub Count_Example1 () Range ("C2"). Value = "= Count (A1: A7)" End Sub

Führen Sie diesen VBA-Code mit der Taste F5 oder manuell aus. Dann wird die Formel auf die Zelle C2 angewendet.

VBA Count Beispiel # 2

Schauen Sie sich nun ein weiteres Beispiel mit der COUNT-Funktion an. Schauen Sie sich für dieses Beispiel die folgenden Daten an.

Wir haben einige numerische und nicht numerische Werte von A1 bis A11. Jetzt werde ich den folgenden Code anwenden, um die numerischen Werte aus dem Bereich A1 bis A11 zu zählen.

Code:

Sub Count_Example2 () Range ("C2"). Value = "= Count (A1: A11)" End Sub

Wenn wir den obigen Code manuell oder mit der Taste F5 ausführen, erhalten wir das Ergebnis 5.

Wenn wir uns jedoch die Daten von A1 bis A11 genauer ansehen, haben wir numerische Werte in den Zellen A1, A2, A3, A4, A5, A7 und A11. Insgesamt haben wir also numerische Werte in 7 Zellen, aber die Formel hat das Ergebnis als nur 5 zurückgegeben.

Der Grund dafür ist, dass bei genauer Betrachtung jeder Zelle in Zelle A5 und A7 die Werte als Text und nicht als Zahlen gespeichert werden. Die COUNT-Funktion hat das Ergebnis als nur 5 zurückgegeben, da sie die Zellen, die formatiert oder als Text gespeichert sind, als nicht numerische Werte behandelt und aus der numerischen Anzahl ignoriert.

Auf diese Weise können wir die COUNT-Funktion in Excel sowohl als Teil von Arbeitsblättern als auch von VBA-Funktionen verwenden, um die numerischen Werte aus der Liste zu zählen.

Interessante Beiträge...