Boa tarde,
É complicado dizer que não exista, embora, considerando que vc usou o Google, e que, como alguns dizem "Se não está na primeira página do Google, não existe"... rsrs
Posso até estar falando besteira, mas...
A lógica de uma soma é que é necessário passar, obrigatoriamente, por todos os valores, adicionando-os ao total. No caso da função SOMA, creio que ela já deve ter esse código interno, o que eu faria em VBA assim:
For Each Celula In Range("A1:A" & ultma_celula)
Soma = Soma + Celula.Value
Next
Sendo que, pelo pouco que sei de VBA, ele não vai trabalhar diretamente com um range, se você não disser que é preciso "caminhar" dentro desse range. Por isso o código acima.
A partir disso, daria pra ser um pouco mais específico, o que seria um SOMA.SE ou um simples tratamento de erro, como em:
For Each Celula In Range("A1:A" & ultma_celula)
If IsNumeric(Celula.Value) Then Soma = Soma + Celula.Value
Next
Lembre-se de AGRADECER aos que te ajudaram, e de marcar o tópico como [Resolvido]
Gente que cuida de gente.
Gilmar
Postado : 25/12/2013 10:31 am