Producing Totals on All Worksheets

[franklin85 via OfficeKB.com]

Hello All

I have a long list of information relating to different customers who we pay
money to, which I am able to split up into their own sheet.

I however need a macro that can produce totals at the bottom of each of the
columns on their individual sheet. The columns which I need to see a total
for are 'I' to 'X', and this is the same for every worksheet.

Many thanks

Franklin85

 

[Pete_UK]

Consider putting your totals on the top row of those sheets, rather
than below the data - insert a new top row if necessary.

It is quite easy to group those sheets (hold the CTRL key down while
clicking the sheet tabs) and then what you do to one sheet will also
be done to the other sheets that are grouped. So, after grouping the
sheets, you can insert a new row 1, enter this formula in cell I1:

=SUM(I2:I65522)

and then copy this into J1:X1. Then when you Ungroup the sheets (by
clicking onto another sheet, or right-clicking the sheet tab and
clicking on Ungroup) you will find that those sum formulae appear on
each of the sheets which you had grouped. The formula will add up
almost a complete column (I find 65522 easier to remember than 65536).

You could, of course, make the formula:

=SUBTOTAL(9,I2:I65522)

then if you apply filters to the lower range the totals will reflect
what is displayed.

Hope this helps.

Pete