just wondering what most of you professional coders would use:
this vba routine to copy data to a summary sheet
----------------------------------------------------------------------
For c = 4 To 15
Sheets(c).Range("C6").Copy
Sheets("Monthly Totals").Select
Range("C5").Offset(c2, 0).PasteSpecial xlPasteValues,
xlPasteSpecialOperationAdd
Sheets(c).Range("D6").Copy
Sheets("Monthly Totals").Select
Range("D5").Offset(c2, 0).PasteSpecial xlPasteValues,
xlPasteSpecialOperationAdd
Sheets(c).Range("E6").Copy
Sheets("Monthly Totals").Select
Range("E5").Offset(c2, 0).PasteSpecial xlPasteValues,
xlPasteSpecialOperationAdd
c2 = c2 + 1
Next c
------------------------------------------------------------------------
or a formula like this in 36 cells on the summary sheet
=IF($A$2="Main",Jan!$C$5,IF($A$2="North",Jan!$C$6,IF($A$2="Taylor",Jan!$C$7,IF($A$2="Woodhaven",Jan!$C$8,""))))
--
Gary
Bookmarks