WorksheetFunction.Sum (Excel)
Adiciona todos os números em um intervalo de células.
Os números, valores lógicos e representações em forma de texto de números digitados diretamente na lista de argumentos são contados. Se um argumento for uma matriz ou referência, apenas os números nesta matriz ou referência serão contados. Células vazias, valores lógicos ou texto na matriz ou referência são ignorados. Os argumentos que são valores de erro ou texto que não podem ser traduzidos em números geram erros.
Sum (Arg1, Arg2, ..., Arg30)
Dim dblSum As Double
dblSum = WorksheetFunction.Sum(Arg1:=)