Try this
Sub CompileSheet()
Dim Sh As Worksheet
Sheets.Add.Name = "Compile"
For Each Sh In ActiveWorkbook.Sheets
If Sh.Name <> "Compile" Then
Sh.Activate
ActiveSheet.UsedRange.Select
Selection.Copy
Sheets("Compile").Activate
ActiveSheet.Range("A40000").End(xlUp).Activate
ActiveSheet.Paste
End If
Next
End Sub
From: excel-macros@googlegroups.com [mailto:excel-macros@googlegroups.com]
On Behalf Of ashish koul
Sent: Tuesday, July 05, 2011 2:17 PM
To: excel-macros@googlegroups.com
Subject: Re: $$Excel-Macros$$ help me urgent
try this
http://akoul.blogspot.com/search/label/Merge%20data%20from%20multiple%20shee
ts%20to%20sheet1%20in%20same%20workbook
On Tue, Jul 5, 2011 at 11:12 AM, vijayajith VA <vijayajith...@gmail.com>
wrote:
Hi,
I have 30 to 40 excel sheets in one workbook..if i want to copy all the
excel sheet data in one sheet . it takes time..
so is thr any macros for that .
Please help me
thanks in advance.
--
----------------------------------------------------------------------------
------
Some important links for excel users:
1. Follow us on TWITTER for tips tricks and links :
http://twitter.com/exceldailytip
2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
3. Excel tutorials at http://www.excel-macros.blogspot.com
<http://www.excel-macros.blogspot.com/>
4. Learn VBA Macros at http://www.quickvba.blogspot.com
<http://www.quickvba.blogspot.com/>
5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
<http://exceldailytip.blogspot.com/>
To post to this group, send email to excel-macros@googlegroups.com
<><><><><><><><><><><><><><><><><><><><><><>
Like our page on facebook , Just follow below link
http://www.facebook.com/discussexcel
--
Regards
Ashish Koul
<http://akoul.blogspot.com/> akoul.blogspot.com
http://akoul.posterous.com/
<http://akoul.wordpress.com/> akoul.wordpress.com
My <http://in.linkedin.com/pub/ashish-koul/10/400/830> Linkedin Profile
P Before printing, think about the environment.
--
----------------------------------------------------------------------------
------
Some important links for excel users:
1. Follow us on TWITTER for tips tricks and links :
http://twitter.com/exceldailytip
2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
3. Excel tutorials at http://www.excel-macros.blogspot.com
4. Learn VBA Macros at http://www.quickvba.blogspot.com
5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
To post to this group, send email to excel-macros@googlegroups.com
<><><><><><><><><><><><><><><><><><><><><><>
Like our page on facebook , Just follow below link
http://www.facebook.com/discussexcel
--
----------------------------------------------------------------------------------
Some important links for excel users:
1. Follow us on TWITTER for tips tricks and links :
http://twitter.com/exceldailytip
2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
3. Excel tutorials at http://www.excel-macros.blogspot.com
4. Learn VBA Macros at http://www.quickvba.blogspot.com
5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
To post to this group, send email to excel-macros@googlegroups.com
<><><><><><><><><><><><><><><><><><><><><><>
Like our page on facebook , Just follow below link
http://www.facebook.com/discussexcel
