Root Sum Excel... Need some Help

Reply #3

budward — Thu, 09 Nov 2006 05:07:51 GMT

This works also. Just replace A1 with what ever cell you are using.

IF(A1>0,1+MOD(A1-1,9),0

Reply #2

pcnut — Thu, 09 Nov 2006 04:50:16 GMT

Thank you winsumloosesum!

I'm up and running, I appreciate your time and help....

Thanks again.

Reply #1

winsumloosesum — Thu, 09 Nov 2006 04:17:07 GMT

PC Nut

Do the following:

Press Alt+F11 to open Visual Basic Editor (VBE).From the Insert menu, select Module (to add a module).Enter the following lines of code into the module:

Function SumDigits(Number)

Dim i As Integer

For i = 1 To Len(Number)

SumDigits = SumDigits + Val(Mid(Number, i, 1))

Next i

End Function

To test the function:

To test the function, open Paste Function (Shift+F3).From the User Defined category, select the SumDigits f... [ More ]

Root Sum Excel... Need some Help

pcnut — Thu, 09 Nov 2006 03:53:41 GMT

LP members I need some help, is there anyone who has the spreadsheet formula when you enter a pick 3 combination into input, will give you the Root sum in the output cell?

Thanks in advance,

pcnut