Vba: come contare il numero di righe nell'intervallo

È possibile utilizzare la seguente sintassi di base per contare il numero di righe in un intervallo in Excel utilizzando VBA:

 SubCountRows ()
    Range(" E2 ") = Range(" A:A ").Cells.SpecialCells(xlCellTypeConstants).Count
End Sub

Questo particolare esempio conta il numero di righe nella colonna A, quindi assegna il risultato alla cella E2 .

Se invece vuoi visualizzare il numero di righe in una finestra di messaggio, puoi utilizzare la seguente sintassi:

 SubCountRows ()
    'Create variable to store number of rows
    Dim row_count As Integer
    
    'Calculate number of rows in range
    row_count = Range(" A:A ").Cells.SpecialCells(xlCellTypeConstants).Count
    
    'Display the result
    MsgBox " Rows in Column A: " & row_count
End Sub

Gli esempi seguenti mostrano come utilizzare nella pratica ciascuno di questi metodi con il seguente set di dati in Excel che contiene i nomi dei giocatori di basket di tre squadre diverse:

Esempio 1: contare le righe nell’intervallo utilizzando VBA e visualizzare i risultati nella cella

Supponiamo di voler calcolare il numero di righe nella colonna A e visualizzare i risultati in una cella specifica.

Per fare ciò possiamo creare la seguente macro:

 SubCountRows ()
    Range(" E2 ") = Range(" A:A ").Cells.SpecialCells(xlCellTypeConstants).Count
End Sub

Quando eseguiamo questa macro, riceviamo il seguente output:

Nota che la cella E2 contiene il valore 9 .

Questo ci dice che ci sono 9 righe nella colonna A con valori.

Esempio 2: contare le righe nell’intervallo utilizzando VBA e visualizzare i risultati nella finestra di messaggio

Supponiamo invece di voler contare il numero di righe nella colonna A e visualizzare i risultati in una finestra di messaggio.

Per fare ciò possiamo creare la seguente macro:

 SubCountRows ()
    'Create variable to store number of rows
Dim row_count As Integer
    
    'Calculate number of rows in range
    row_count = Range(" A:A ").Cells.SpecialCells(xlCellTypeConstants).Count
    
    'Display the result
    MsgBox " Rows in Column A: " & row_count
End Sub

Quando eseguiamo questa macro, riceviamo il seguente output:

La finestra di messaggio ci dice che ci sono 9 righe nella colonna A con valori.

Tieni presente che in questo esempio abbiamo calcolato il numero di righe in tutta la colonna A utilizzando A:A come intervallo.

Se invece vuoi calcolare il numero di righe con valori compresi in un intervallo specifico, puoi digitare A2:A9 (o qualsiasi altro intervallo di tuo interesse).

Risorse addizionali

I seguenti tutorial spiegano come eseguire altre attività comuni in VBA:

VBA: come scrivere le funzioni MEDIA.SE e MEDIA.SE
VBA: come scrivere le funzioni SOMMA.SE e SOMMA.FS
VBA: come scrivere le funzioni COUNTIF e COUNTIFS