VBA Count

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.

Sie können diese VBA-Zählfunktionsvorlage hier herunterladen - VBA-Zählfunktionsvorlage

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: Jetzt 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, das 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 nicht die Formel, sondern nur das Ergebnis der Formel. 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. Dadurch 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 als Text formatiert oder gespeichert wurden, als nicht numerische Werte behandelt und aus der numerischen Anzahl ignoriert.

Auf diese Weise können wir die COUNT-Funktion in Excel als Teil des Arbeitsblatts und der VBA-Funktion verwenden, um die numerischen Werte aus der Liste zu zählen.