Vba: come aggiungere valori in un intervallo

È possibile utilizzare la seguente sintassi di base per calcolare la somma dei valori in un intervallo utilizzando VBA:

 SubSumValues ()
    Range(" D2 ") = WorksheetFunction.Sum(Range(" B2:B11 "))
End Sub

Questo particolare esempio calcola la somma dei valori nell’intervallo B2:B11 e assegna il risultato alla cella D2 .

Se vuoi invece visualizzare la somma dei valori in una finestra di messaggio, puoi utilizzare la seguente sintassi:

 SubSumValues ()
    'Create variable to store sum of values
    Dim sum As Single
    
    'Calculate sum of values in range
    sum = WorksheetFunction.Sum(Range(" B2:B11 "))
    
    'Display the result
    MsgBox " Sum of Values in Range: " & sum
End Sub

Gli esempi seguenti mostrano come utilizzare nella pratica ciascuno di questi metodi con il seguente set di dati in Excel che contiene informazioni su vari giocatori di basket:

Esempio 1: calcola la somma dell’intervallo utilizzando VBA e visualizza i risultati nella cella

Supponiamo di voler calcolare la somma dei valori nella colonna dei punti e visualizzare i risultati in una cella specifica.

Per fare ciò possiamo creare la seguente macro:

 SubSumValues ()
    Range(" D2 ") = WorksheetFunction.Sum(Range(" B2:B11 "))
End Sub

Quando eseguiamo questa macro, riceviamo il seguente output:

Nota che la cella D2 contiene il valore 245 .

Questo ci dice che la somma dei valori nella colonna punti è 245.

Esempio 2: calcolare la somma dell’intervallo utilizzando VBA e visualizzare i risultati nella finestra di messaggio

Supponiamo invece di voler calcolare la somma dei valori della colonna punti e visualizzare i risultati in una finestra di messaggio.

Per fare ciò possiamo creare la seguente macro:

 SubSumValues ()
    'Create variable to store sum of values
    Dim sum As Single
    
    'Calculate sum of values in range
    sum = WorksheetFunction.Sum(Range(" B2:B11 "))
    
    'Display the result
    MsgBox " Sum of Values in Range: " & sum
End Sub

Quando eseguiamo questa macro, riceviamo il seguente output:

La finestra di messaggio ci dice che la somma dei valori nell’intervallo B2:B11 è 245 .

Tieni presente che in questo esempio abbiamo calcolato la somma dei valori nell’intervallo B2:B11 .

Tuttavia, se desideri invece calcolare la somma dei valori di un’intera colonna, puoi digitare B:B .

Questo calcolerà la somma dei valori per ciascuna cella nella colonna B.

Risorse addizionali

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

VBA: come calcolare il valore medio dell’intervallo
VBA: come contare il numero di righe nell’intervallo
VBA: come scrivere le funzioni SOMMA.SE e SOMMA.FS