Живая ячейка данных разделить и добавить

Question

Я использую данные в реальном времени, в которых я хочу разбить каждый номер ячейки на отдельный номер и добавить их.

Example: 
cell A1 contains number 265.96
Into 26596 and add these number
ie 2+6+5+9+6

Answer 1

UDF может выглядеть как

Public Function GetSum(ByRef rng As Range) As Long
    Dim i As Long
    For i = 1 To Len(rng.Value)
        If IsNumeric(Mid(rng.Value, i, 1)) Then GetSum = GetSum + Mid(rng.Value, i, 1)
    Next i
End Function

Answer 2

Вы можете сделать это с формулой, как в B1:

=SUMPRODUCT(1*MID(SUBSTITUTE(A1,".",""),ROW(INDIRECT("1:"&LEN(SUBSTITUTE(A1,".","")))),1))

Подтвердите с помощью: CTLR+SHIFT+ENTER