View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.worksheet.functions
Gary''s Student
 
Posts: n/a
Default summarise totals from many worksheets into one final worksheet

If yo have many worksheets, the formula approach will be very long. Look at
this small piece of VBA:


Sub Macro1()
Dim w As Worksheet
t = 0
For Each w In Worksheets
w.Activate
t = t + Cells(1, 1)
Next
MsgBox (t)
End Sub


It adds up all the A1 cells in the workbook.
It doesn't care how many worksheets there are.
It doesn't need to know the names of the worksheets.

Perhaps you can adapt it for your needs.
--
Gary's Student


"NAAPS" wrote:

I need to add totals from many worksheets onto one final Summary worksheet.
the formula I create is too long for Excel. is there a way to shorten the
formula eg using the SUM function + Shift or Control keys? I believe Lotus
is able to do this.