macro sub-total and autosum for variable length columns

[RGH]

Two issues both involving the same data set on different tabs. The data is being sorted, etc differently for each tab for different departments at work.

1. One tab has a variable amount of row data (300-5000+ rows), same number of columns, and needs an auto sum for one column at the bottom. I need to put the auto sum after the last row, not row 10,000. Help?

2. The other tab I need to put subtotals on. Same issues with variable amounts of data. The subtotal can't have a bunch of empty rows before the last groupings total and the grand total tab. Again, help.

Rob

 

[big_mac]

Have you tried?
last = ActiveCell.SpecialCells(xlLastCell).Row
to get equivalent of end+ home