Thread: summing
View Single Post
  #3   Report Post  
Posted to microsoft.public.excel.programming
ChrisG[_4_] ChrisG[_4_] is offline
external usenet poster
 
Posts: 5
Default summing


Thanks, I see.

-----Original Message-----
One way

Sub test()
Sheets("Sheet1").Range("A1").Value = _
Application.WorksheetFunction.Sum(Range("H:H"))
End Sub


--
Regards Ron de Bruin
(Win XP Pro SP-1 XL2002 SP-2)
www.rondebruin.nl



"ChrisG" wrote in

message ...
I have code to enter 0 or 1 in column H. When code
finishes I would like to add all values in column H and
place in Cell A1. How can I do this?



.