VBA : Comment compter les lignes dans la sélection
Vous pouvez utiliser les méthodes suivantes pour compter le nombre de lignes dans une sélection à l’aide de VBA :
Méthode 1 : compter les lignes dans la sélection et afficher le nombre dans la boîte de message
Sub CountRowsInSelection()
MsgBox Selection.Rows.Count
End Sub
Cet exemple particulier compte le nombre de lignes dans la sélection actuelle, puis affiche ce nombre dans une boîte de message.
Méthode 2 : compter les lignes dans la sélection et afficher le nombre dans une cellule spécifique
Sub CountRowsInSelection()
Range("E1").Value = Selection.Rows.Count
End Sub
Cet exemple particulier compte le nombre de lignes dans la sélection actuelle, puis affiche ce nombre dans la cellule E1 .
Les exemples suivants montrent comment utiliser chaque méthode dans la pratique.
Exemple 1 : compter les lignes dans la sélection et afficher le nombre dans la boîte de message
Supposons que nous sélectionnions la plage de cellules A1:C17 dans notre feuille de calcul :
Nous pouvons créer la macro suivante pour compter le nombre de lignes dans la sélection et afficher les résultats dans une boîte de message :
Sub CountRowsInSelection()
MsgBox Selection.Rows.Count
End Sub
Lorsque nous exécutons cette macro, nous recevons le résultat suivant :
La boîte de message nous indique qu’il y a 17 lignes dans la sélection actuelle.
Exemple 2 : compter les lignes dans la sélection et afficher le nombre dans une cellule spécifique
Supposons que nous sélectionnions la plage de cellules A4:D9 dans notre feuille de calcul :
Nous pouvons créer la macro suivante pour compter le nombre de lignes dans la sélection et afficher les résultats dans la cellule E1 :
Sub CountRowsInSelection()
Range("E1").Value = Selection.Rows.Count
End Sub
Lorsque nous exécutons cette macro, nous recevons le résultat suivant :
La cellule E1 nous indique qu’il y a 6 lignes dans la sélection actuelle.
Ressources additionnelles
Les didacticiels suivants expliquent comment effectuer d’autres tâches courantes dans VBA :
Comment compter les lignes dans un tableau à l’aide de VBA
Comment compter les cellules avec un texte spécifique à l’aide de VBA
Comment compter les valeurs uniques dans la plage à l’aide de VBA