Para realizar uma soma no Excel com VBA, você pode utilizar a função "SUM" seguida de um range de células. Veja o exemplo abaixo:
``` Sub Soma()
Dim total As Double
'total recebe a soma dos valores das células A1 a A10 do Sheet1 total = Worksheet("Sheet1").Range("A1:A10").Sum
MsgBox "A soma total é: " & total
End Sub ```
Neste exemplo, a variável "total" recebe a soma dos valores das células A1 a A10 do Sheet1. Em seguida, uma mensagem é exibida com o resultado da soma. É importante lembrar que a função SUM deve ser utilizada dentro de uma célula ou range de células no Excel. Quando utilizada dentro do VBA, ela deve ser precedida pela referência ao range de células desejado.