Sounds like it is using selection and the selection isn't being expanded on
each iteration.

after each subtotal command put in a line like

selection.CurrentRegion.Select

--
Regards,
Tom Ogilvy

"KJaquish" wrote in message
...
I am having a problem creating a macro to create nested subtotals. I used
the Record Macro feature and when I stop recording, the data looks just as
I
want it. However, when I run the macro, it displays one of the Grand
Totals
near, but not at the bottom of the data, and it doesn't include a subtotal
for the last group of data at all. The Grand Total that does appear at
the
bottom appears correct, but the odd formatting and placement make it
difficult to use. How can I get the macro to return the same results that
I
get if I create the subtotals manually?