Fonction de comptage VBA

Dans Excel, nous utilisons la fonction de comptage pour compter le nombre de cellules qui contient des nombres. La même chose peut être faite dans VBA également. Dans VBA, nous pouvons utiliser la même fonction Count pour obtenir le nombre de cellules contenant des nombres. Il ne compte que la cellule avec des nombres. Les valeurs autres que les nombres ne peuvent pas être comptées.

Syntaxe de Count dans Excel VBA

La syntaxe de la fonction VBA Count dans Excel est la suivante:

Comment utiliser le nombre VBA dans Excel?

Nous allons apprendre à utiliser une fonction de comptage VBA avec quelques exemples dans Excel.

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

Exemple # 1 - Nombre VBA

Pour la mise en œuvre, nous avons une liste de certaines données dans la colonne A. Cette liste contient des nombres et des textes comme indiqué ci-dessous. Maintenant, avec l'aide de la fonction Count dans VBA, nous allons voir combien de cellules ont des nombres. Pour cela, nous avons identifié une cellule en position A8, où nous verrons la sortie de la fonction de comptage via VBA.

Étape 1: Pour cela, nous avons besoin d'un module. Accédez à l'onglet de menu Insérer et cliquez sur l'option Module comme indiqué ci-dessous dans la liste.

Étape 2: Après cela, nous obtiendrons la fenêtre vierge du module. Maintenant, dans cette écriture, la sous-catégorie de VBA Count. Ou choisissez n'importe quel autre nom selon votre choix.

Code:

 Sub VBACount () End Sub

Étape 3: Sélectionnez la plage de la cellule à laquelle nous voulons appliquer la fonction Count. Ici, notre cellule de sortie est A8 comme défini ci-dessus. Nous l'avons donc sélectionné comme notre gamme .

Code:

 Plage Sub VBACount () ("A8"). End Sub

Étape 4: Maintenant, obtenez la commande Value, et cela nous permet d'y ajouter la valeur.

Code:

 Sub VBACount () Range ("A8"). Value = End Sub

Étape 5: Maintenant, à l'aide de la fonction de comptage, sélectionnez la plage de cellules à partir de laquelle nous voulons obtenir le comptage d'un nombre de cellules contenant uniquement des nombres. Ici, nous avons sélectionné la plage de cellules de A1 à A6.

Code:

 Sub VBACount () Range ("A8"). Value = "= Count (A1: A6)" End Sub

Étape 6: Une fois terminé, compilez le code et exécutez-le en cliquant sur le bouton de lecture. Comme nous pouvons le voir ci-dessous, le nombre de cellules contenant des nombres arrive à 3. Ce qui signifie que la fonction Count dans VBA a donné le nombre de cellules avec des nombres qui vont de la cellule A1 à A3.

Exemple # 2 - Nombre VBA

De la même manière, nous avons un autre ensemble de données. Mais ces données ont des dates, un numéro avec du texte ainsi que des chiffres et du texte comme indiqué ci-dessous. Nous avons fixé une cellule C12 où nous verrons la sortie de la fonction Count via VBA.

Nous allons maintenant appliquer la fonction Count et voir si cela peut compter les cellules de date et de nombre-texte ou non. Nous pouvons choisir d'écrire à nouveau le nouveau code ou nous pouvons référencer le même code que nous avons vu dans l'exemple-1 et juste changer les cellules de référence.

Étape 1: Accédez à l'onglet de menu Insérer et cliquez sur l'option Module comme indiqué ci-dessous dans la liste.

Code:

 Sub VBACount2 () End Sub

Étape 2: Sélectionnez la plage de cellules où nous voulons voir la sortie. Ici, cette cellule est C12.

Code:

 Sub VBACount2 () Range ("C12"). Value = End Sub

Étape 3: Utilisez maintenant la fonction de comptage dans des virgules inversées pour sélectionner la plage de ces cellules que nous devons compter. Ici, cette plage va de la cellule C1 à C10.

Code:

 Sub VBACount2 () Plage ("C12"). Value = "= Count (C1: C10)" End Sub

Étape 4: exécutez maintenant le code ci-dessus.

Nous verrons que la fonction Count a renvoyé le nombre de cellules comme 6, comme indiqué ci-dessous. Ce qui signifie que la fonction de comptage peut également compter les cellules avec Date. Ici, les valeurs surlignées en gras sont les valeurs qui viennent d'être comptées via la fonction Count dans VBA.

Exemple # 3 - Nombre VBA

Il existe une autre façon d'utiliser la fonction de comptage dans VBA. Cette méthode implique l'utilisation de cellules actives de la feuille. Ici, nous utiliserons les mêmes données que celles que nous avons vues dans l'exemple-1.

Étape 1: Ouvrez un nouveau module et créez la sous-catégorie au nom de VBA Count comme indiqué ci-dessous.

Code:

 Sub VBACount3 () End Sub

Étape 2: insérez d'abord la fonction ActiveCell dans VBA. Cela vous aidera à sélectionner la plage de cellules.

Code:

 Sub VBACount3 () ActiveCell. End Sub

Étape 3: Maintenant, avec la fonction Formula, sélectionnez le numéro de ligne et le numéro de colonne que nous voulons insérer dans la fonction Count. Ici, notre ligne de référence commence à 1 et la colonne est également 1.

Code:

 Sub VBACount3 () ActiveCell.FormulaR1C1 = End Sub

Étape 4: Insérez maintenant la fonction Count sous des virgules inversées comme indiqué ci-dessous.

Code:

 Sub VBACount3 () ActiveCell.FormulaR1C1 = "= COUNT ()" End Sub

Étape 5: Sélectionnez la plage des cellules à partir du point où nous appliquons la fonction Count. Alors que nous montons de A8 à A1, le nombre de lignes sera " -7 " et la colonne est la première à rien est mentionnée au nombre de lignes "-2" à partir du point de départ qui est la cellule A8 .

Code:

 Sub VBACount3 () ActiveCell.FormulaR1C1 = "= COUNT (R (-7) C: R (-2) C)" End Sub

Étape 6: Sélectionnez maintenant la plage de cellules où nous voulons voir la sortie. Ici, dans cette cellule de plage A8, nous verrons également le curseur.

Code:

 Sub VBACount3 () ActiveCell.FormulaR1C1 = "= COUNT (R (-7) C: R (-2) C)" Range ("B8"). Sélectionnez End Sub

Étape 7: exécutez maintenant le code. Nous verrons, la fonction de comptage a renvoyé le même nombre de nombres que 3 que nous avons obtenu dans l'exemple-1.

Avantages de VBA Count

  1. C'est aussi simple que d'appliquer la fonction Count dans Excel.
  2. C'est l'une des fonctions les plus simples qui pourraient être automatisées via VBA.
  3. Si le processus Count se répète plusieurs fois, l'automatisation à l'aide de la fonction Count dans VBA est un moyen de gagner du temps et de minimiser les efforts.

Choses dont il faut se rappeler

  • Lors de l'application de la fonction de comptage dans VBA, citez toujours le nom de la fonction entre virgules inversées.
  • Comme nous utilisons Count dans Excel, la même manière est également observée lors de l'application de la fonction Count dans VBA.
  • Le processus d'application du décompte VBA peut également être effectué en recodant une macro.
  • Enregistrez toujours le code écrit dans VBA dans Macro enable excel file format pour éviter de perdre du code.

Articles recommandés

Ceci est un guide pour VBA Count. Ici, nous discutons de l'utilisation de la fonction de comptage Excel VBA avec des exemples pratiques et un modèle Excel téléchargeable. Vous pouvez également consulter nos autres articles suggérés -

  1. Fonction Copier Coller dans VBA
  2. Fonction Excel de sous-chaîne
  3. Indice VBA hors plage
  4. Formule ISNUMBER Excel

Catégorie:

VBA