summing

C

ChrisG

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?
 
R

Ron de Bruin

One way

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