macro to sum each range individually within a single column

I have ranges of numbers in column A separated by 2 blank rows. I would like to write a macro that places the sum of each range within the first blank cell above the range of numbers.

For example, there are numerical values within the range A3:A6. I would like to have the sum of A3:A6 placed in A2.

The reason I need the macro is because the ranges vary in length. Some ranges may be 1 row while others contain 50 or more rows. The total number of rows in this sheet is approximately 22,000 (this includes all of the blank rows). By the way, if there is only one row or data I would still like to have it's value placed in the first blank cell above.

I am extremely new to writing macros and apparently lack the knowledge to complete this task without some expert help. If would appreciate any help that I can get.

If there's an existing thread for such an issue please provide the link so that I can hopefully learn.

Thanks,
J

Why use a macro at all? If all your data is in col A, use =IF(ISBLANK(C12),C11,D12+C11) in col B and the total will magically appear above each subsection of data, albeit in col B, not A.

EDIT: The formula assumes your first data entry is in column C, row 11. You have to adjust the references.

Hello,

Another way to

1) create a sheet named "test" and put the numbers in column "A"
2) copy the following code in a standard module

Please Login or Register  to view this content.

Adapt any constants identified by # # #

The results appear in a new sheet.

Best regards.

Hello,
This is a great forum. This is my first post. I saw the answer to the following thread

http://www.excelforum.com/excel-prog...le-column.html

I am interested in this answer, but I need the total a the bottom of each range that is summed up. Can anyone help me with this.

Thanks,
yodzak

Hello,

Try this code

Please Login or Register  to view this content.

Best regards.

PMO
Patrick Morange