Re: $$Excel-Macros$$ Consolidate data in different work sheets

2011-11-10 Thread dguillett1
com From: smitha.kumari Sent: Thursday, November 10, 2011 12:51 AM To: excel-macros@googlegroups.com Subject: RE: $$Excel-Macros$$ Consolidate data in different work sheets Hi Haseeb, This will not consolidate the name , only the hours. Isn’t it? Regards Smitha/ Senior Finance Executive Wo

RE: $$Excel-Macros$$ Consolidate data in different work sheets

2011-11-09 Thread smitha.kumari
om From: excel-macros@googlegroups.com [mailto:excel-macros@googlegroups.com] On Behalf Of Haseeb Avarakkan Sent: Thursday, November 10, 2011 12:02 PM To: excel-macros@googlegroups.com Subject: Re: $$Excel-Macros$$ Consolidate data in different work sheets Hello Smitha; Use this in Sheet

Re: $$Excel-Macros$$ Consolidate data in different work sheets

2011-11-09 Thread Sam Mathai Chacko
if you just want to do a sum of all the same cells across multiple sheets, you could use something like this =SUM(Sheet2:Sheet5!A2) Regards, Sam Mathai Chacko On Wed, Nov 9, 2011 at 6:59 PM, dguillett1 wrote: > Do you want to copy a range from each sheet to a master or do a > summary from

Re: $$Excel-Macros$$ Consolidate data in different work sheets

2011-11-09 Thread dguillett1
Do you want to copy a range from each sheet to a master or do a summary from different sheets? Don Guillett SalesAid Software dguille...@gmail.com From: smitha.kumari Sent: Tuesday, November 08, 2011 10:38 PM To: excel-macros@googlegroups.com Subject: $$Excel-Macros$$ Consolidate data in diff

RE: $$Excel-Macros$$ Consolidate data in different work sheets

2011-11-09 Thread smitha.kumari
esday, November 09, 2011 2:51 PM To: excel-macros@googlegroups.com Subject: Re: $$Excel-Macros$$ Consolidate data in different work sheets Sub method2() Dim i, j, k, s As Long s = Sheets.Count Sheets.Add After:=Sheets(Sheets.Count) For i = 1 To s Sheets(i).Select j = 2 ' it will copy till las

Re: $$Excel-Macros$$ Consolidate data in different work sheets

2011-11-09 Thread ashish koul
Sub method2() Dim i, j, k, s As Long s = Sheets.Count Sheets.Add After:=Sheets(Sheets.Count) For i = 1 To s Sheets(i).Select j = 2 ' it will copy till last used row automatically k = ActiveSheet.UsedRange.Rows.Count Rows(j & ":" & k).Copy Sheets(Sheets.Count).Select Sheets(Sheets.Count).Range("a65