Thread: summing numbers with in a cell

i need to know how to sum the numbers with in a cell.

in cell a1 i have 4099227911503, i know that if i add these numbers up, the sum would be 52. how do i write a formula that will do the same thing. i need to add the numbers with in the cell so that i can do a mod 10 to get the check digit. i am creating a data base for merging with envelopes and i need to put the planet code "a1" with a check digit

Good evening the-charles

This function will add up all the numbers in a cell, provided it is applied to a numeric cell. Once pasted into your VBE use it like you would a formula, thus:

=Adder(A1) will perform the operation on cell A1.

Function Adder(InThis)
d = 0
a = Len(InThis)
For b = 1 To a
c = Mid(InThis, b, 1)
d = d + c
Next b
Adder = d
End Function

HTH

DominicB

Do you mean within a series of cells, like A1 thru A60? If so, using this
example, in let's say A62 place @SUM(A1:A60).

HTH

On Wed, 6 Jul 2005 11:57:49 -0500, the-charles
<the-charles.1rrcil_1120669560.9455@excelforum-nospam.com> wrote:

>
>in cell a1 i have 4099227911503, i know that if i add these numbers up,
>the sum would be 52. how do i write a formula that will do the same
>thing. i need to add the numbers with in the cell so that i can do a
>mod 10 to get the check digit. i am creating a data base for merging
>with envelopes and i need to put the planet code "a1" with a check
>digit

You may use this array formula:

=SUM(--MID(A1,ROW(INDIRECT("1:"&LEN(A1))),1))

To enter an array formula, after typing or pasting it into the formula bar,
hold down <ctrl><shift> while hitting <enter>. Excel will place braces {...}
around the formula.


--ron