VBA COUNTA

Fonction de feuille de calcul COUNTA dans Excel VBA

Dans notre article précédent «Excel COUNTA», nous avons vu comment utiliser la fonction COUNT pour compter les valeurs numériques de la plage de valeurs. Que diriez-vous de compter toutes les valeurs de la plage de cellules? Oui, nous pouvons compter cela aussi. Pour compter toutes les valeurs de cellule dans la plage de cellules, nous devons utiliser la formule «COUNTA» dans Excel VBA. Dans cet article, nous allons vous montrer comment utiliser la fonction COUNTA dans VBA pour compter toutes les valeurs de cellule dans la plage fournie.

Exemples de fonction COUNTA dans VBA

L'une des vérités est que la fonction «COUNTA» n'est pas une fonction VBA. Je sais que votre question est de savoir si ce n'est pas une fonction VBA, comment l'utiliser? Rien d'inquiétant même s'il ne s'agit pas d'une fonction VBA, nous pouvons toujours l'utiliser sous la classe de fonction de feuille de calcul dans le codage VBA.

Vous pouvez télécharger ce modèle Excel VBA COUNTA ici - Modèle Excel VBA COUNTA

Ok, écrivons le code pour appliquer l'excel VBA COUNTA.

Étape 1: Créez un nom de sous-procédure.

Étape 2: Décidez maintenant d'abord où nous allons stocker le résultat de la fonction VBA COUNTA. Dans cet exemple, je souhaite stocker le résultat dans la cellule C2. Donc mon code sera Range («C2»). Value.

Code:

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

Étape 3: Dans la cellule C2, nous avons besoin de la valeur de la fonction VBA COUNTA. Donc, pour appliquer la fonction Excel VBA COUNTA, appliquons d'abord la classe de fonction de feuille de calcul.

Code:

 Sub Counta_Example1 () Range ("C2"). Value = Work End Sub 

Étape 4: Après avoir appliqué la classe de fonctions de la feuille de calcul, sélectionnez la formule COUNTA en mettant un point.

Code:

 Sub Counta_Example1 () Range ("C2"). Value = WorksheetFunction.Count End Sub 

Étape 5: Nous devons maintenant fournir la plage de cellules à compter. Dans cet exemple, nous devons compter la plage de cellules de A1 à A11. Fournissez donc les cellules à l'aide de l'objet VBA RANGE.

Code:

 Sub Counta_Example1 () Range ("C2"). Value = WorksheetFunction.CountA (Range ("A1: A11")) End Sub 

Ok, exécutons le code pour obtenir le résultat dans la cellule C2.

Donc, le même résultat renvoyé par VBA COUNTA également.

Comme ça, nous pouvons utiliser COUNTA pour compter les cellules non vides ou non vides de la plage fournie.

Codage avec des variables

Les variables VBA sont la clé de la construction d'un projet. Maintenant, pour les mêmes données, nous pouvons déclarer des variables VBA et arriver au résultat.

Pour un exemple, regardez le code ci-dessous.

Code:

 Sub Counta_Example2 () Dim CountaRange As Range Dim CountaResultCell As Range Set CountaRange = Range ("A1: A11") Set CountaResultCell = Range ("C2") CountaResultCell = WorksheetFunction.CountA (CountaRange) End Sub 

Expliquons maintenant le code ci-dessus.

J'ai d'abord déclaré la variable «CountaRange» comme plage pour référencer la plage de valeurs.

 Dim CountaRange As Range

Ensuite, j'ai défini la référence comme plage A1 à A11.

 Définir CountaRange = Range ("A1: A11")

La deuxième variable consiste à référencer la cellule de résultat COUNTA.

 Dim CountaResultCell As Range

Pour cette variable, j'ai défini la cellule comme C2.

 Définir CountaResultCell = Range ("C2")

Maintenant, comme d'habitude, j'ai appliqué la fonction COUNTA en utilisant des variables au lieu de plages codées en dur. Maintenant, regardez l'ancien code et ce code VBA.

Code 1:

Code 2:

Dans le code 1, nous avons la plage C2, dans le code 2, nous avons le nom de variable «CountaResultCell». Ici, la variable «CountaResultCell» définit la référence comme cellule C2. Donc, cette variable est maintenant la cellule C2.

Dans le code 1, la plage de fonctions COUNTA est A1 à A11, dans le code 2, il s'agit d'une variable appelée «CountaRange». Cette variable contient une référence à la plage A1 à A11.

C'est la différence entre l'ancien code et le code avec des variables.

Ainsi, la fonction COUNTA nous aide à compter toutes les cellules non vides de la plage fournie quelles que soient les données dont elle dispose.