Any of you able to point me in the right direction? I know that I can use sum functions that are already in excel, but I want to know how i can do it myself :)
Here is my code:
Sub test()
Dim Startcell, row, column
Dim sumnumbers
Set Startcell = Range("Startcell")
row = Startcell.row
column = Startcell.column
sumnumbers = 0
Do While Cells(row, column).Value <> ""
sumnumbers = sumnumbers + Cells(row, column).Value
row = row + 1
Loop
Range("sum").Value = sumnumbers
End Sub
Here is how it looks like in Excel: ttp://img29.imageshack.us/img29/5290/excel.png
Edited by Orjan, 05 December 2009 - 06:33 AM.
Please use code tags when posting code


Sign In
Create Account

Back to top









