summing numbers with in a cell

[the-charles]

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

 

[the-charles]

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 sam
thing. i need to add the numbers with in the cell so that i can do
mod 10 to get the check digit. i am creating a data base for mergin
with envelopes and i need to put the planet code "a1" with a chec
digi

 

[dominicb]

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

 

[DNA]

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

 

[Ron Rosenfeld]

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