Sommare numeri contenuti in singola cella

[|Mauro|]

Buongiorno a tutti, volevo sapere se era possibile sommare i numeri contenuti in una singola cella:

esempio se A1 contiene il valore 12345, come fare per ottenere la somma 1+2+3+4+5 in A2?
Grazie mille per l'eventuale interessamento, buona giornata a tutti!!

[Anthony47]

La cosa piu' veloce e' che ti fai una UDF, User Defined Function, con questo codice, da inserire su un Modulo di codice dell' editor vba:
Function Anto(Valo) As Integer
For I = 1 To Len(Valo)
Anto = Anto + Val(Mid(Valo, I, 1))
Next I
End Function

Procedura:
>Alt-F11, poi Inserisci /Modulo; incolli il codice nel frame di dx
>sul foglio excel scrivi =ANTO(A1), se A1 e' la cella che vuoi conteggiare.

Risolve? Ciao.