Home |
Search |
Today's Posts |
#1
![]()
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
![]() Dear Team, I am having 20 worksheets which contains my daily reports. I need to all these worksheets into one singlw worksheet. Means append one by one. If there is any function or Macro. I am having Excel 2003/2007. Kindly help me. Reagdrs, Rahul. |
#2
![]()
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
![]()
If all the sheets has same format then you can use this Macro
May be this help this Macro Sub newsummarysheet() Sheets.Add ActiveSheet.Name = "Summary" For Each ws In ActiveWorkbook.Sheets dlr = Cells(Rows.Count, "a").End(xlUp).Row + 1 slr = ws.Cells(Rows.Count, "a").End(xlUp).Row If ws.Name < "Summary" Then ws.Rows("1:" & slr).Copy Cells(dlr, 1) End If Next ws End Su "Rahul" wrote: Dear Team, I am having 20 worksheets which contains my daily reports. I need to all these worksheets into one singlw worksheet. Means append one by one. If there is any function or Macro. I am having Excel 2003/2007. Kindly help me. Reagdrs, Rahul. |
#3
![]()
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
![]()
I think this will do what you want:
http://www.rondebruin.nl/copy2.htm If you don't know anything about VA take a look at this: http://www.anthony-vba.kefra.com/vba...ur_First_Macro Regards, Ryan--- -- RyGuy "Hardeep_kanwar" wrote: If all the sheets has same format then you can use this Macro May be this help this Macro Sub newsummarysheet() Sheets.Add ActiveSheet.Name = "Summary" For Each ws In ActiveWorkbook.Sheets dlr = Cells(Rows.Count, "a").End(xlUp).Row + 1 slr = ws.Cells(Rows.Count, "a").End(xlUp).Row If ws.Name < "Summary" Then ws.Rows("1:" & slr).Copy Cells(dlr, 1) End If Next ws End Su "Rahul" wrote: Dear Team, I am having 20 worksheets which contains my daily reports. I need to all these worksheets into one singlw worksheet. Means append one by one. If there is any function or Macro. I am having Excel 2003/2007. Kindly help me. Reagdrs, Rahul. |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
Append Excel Sheet from constantly updating delimited text file | Setting up and Configuration of Excel | |||
Printing single pages from multiple worksheets in a single print job | Excel Discussion (Misc queries) | |||
Append worksheets together in one | Excel Discussion (Misc queries) | |||
Append the data given in diff sheets of an Excel File to one sheet | Excel Worksheet Functions | |||
is it possible to use F9 to manually calculate in a single sheet or single workbook? | Excel Discussion (Misc queries) |