insert row and add functions

[gazeteer]

I'm trying to write a macro to loop through rows in a large range.
When it determines that, for example A2 <> A3 it inserts two rows.
It then counts number of records in that section SUMS all the numbers
in this section. i.e above first newly inserted row back to last blank
row.

2006/02/14 65 Apples
2006/02/14 43 Apples
2006/02/14 43 Apples
2006/02/14 43 Apples
2006/02/14 43 Apples
2006/02/15 22 Apples
2006/02/15 11 Apples

Would then become

2006/02/14 65 Apples
2006/02/14 43 Apples
2006/02/14 43 Apples
2006/02/14 43 Apples
2006/02/14 43 Apples
5 237

2006/02/15 22 Apples
2006/02/15 11 Apples
2 33 Apples

Any assistance would be very helpful

I've just about got inserting blank row..it's the next bit that's :-(.

Cheers

 

[Guest]

Instead of doing the code have you looked into subtotaling or a pivot table.
My preference for those kinds of things is a pivot table. You can make
multiple pivot tables off the same source data and also you could group your
items by day, month, year... It makes for a much more dynamic and user
friendly report. Not to mention by adding a format it will amaze and delight
anyone you send it to...