VBA : Comment compter le nombre de colonnes utilisées

Vous pouvez utiliser la syntaxe de base suivante pour compter le nombre de colonnes utilisées dans une feuille Excel à l’aide de VBA :

Sub CountColumns()
    Range("A10") = Sheet1.Cells(1, Columns.Count).End(xlToLeft).Column
End Sub

Cet exemple particulier compte le nombre de colonnes utilisées dans la feuille appelée Sheet1 et affiche le résultat dans la cellule A10 .

Si vous souhaitez plutôt afficher le nombre de colonnes dans une boîte de message, vous pouvez utiliser la syntaxe suivante :

Sub CountColumns()
    Dim LastCol As Long
    LastCol = Sheet1.Cells(1, Columns.Count).End(xlToLeft).Column
    MsgBox "Column Count: " & LastCol
End Sub

Les exemples suivants montrent comment utiliser chacune de ces méthodes en pratique avec l’ensemble de données suivant dans Excel qui contient des informations sur divers joueurs de basket-ball :

Exemple 1 : compter les colonnes utilisées dans VBA et afficher les résultats dans la cellule

Supposons que nous souhaitions compter le nombre de colonnes utilisées et afficher les résultats dans une cellule spécifique.

Nous pouvons créer la macro suivante pour ce faire :

Sub CountColumns()
    Range("A10") = Sheet1.Cells(1, Columns.Count).End(xlToLeft).Column
End Sub

Lorsque nous exécutons cette macro, nous recevons le résultat suivant :

Notez que la cellule A10 contient la valeur 4 .

Cela nous indique qu’il y a 4 colonnes utilisées.

Exemple 2 : compter les colonnes utilisées dans VBA et afficher les résultats dans la boîte de message

Supposons que nous souhaitions plutôt compter le nombre de colonnes utilisées et afficher les résultats dans une boîte de message.

Nous pouvons créer la macro suivante pour ce faire :

Sub CountColumns()
    Dim LastCol As Long
    LastCol = Sheet1.Cells(1, Columns.Count).End(xlToLeft).Column
    MsgBox "Column Count: " & LastCol
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 4 colonnes utilisées.

Remarque : S’il y a des colonnes vides suivies de colonnes contenant des données, VBA comptera les colonnes vides comme « utilisées » dans le calcul.

Ressources additionnelles

Les didacticiels suivants expliquent comment effectuer d’autres tâches courantes dans VBA :

VBA : Comment compter le nombre de feuilles dans un classeur
VBA : Comment compter le nombre de lignes dans la plage
VBA : Comment compter les cellules avec un texte spécifique