thy this

Sub Macro1()
x = 1
Do While Range("B" & x).Value < ""
' Range("B" & x) = Abs(Range("B" & x))
x = x + 1
y = y + Range("B" & x).Value
Loop
Range("C1") = y
MsgBox ("Count = " & x & " Total = " & y)
End Sub



"drummerboy827" wrote in message
...
thanks...that works great in changing negative to positive and it looks
like it is adding them as it goes as well...my question is now how to
display the x value in a text box or soemthing on the macro page.

~chris culp



------------------------------------------------
~~ Message posted from http://www.ExcelTip.com/
~~ View and post usenet messages directly from http://www.ExcelForum.com/