Paste all sheets into one master sheet

  • Thread starter Thread starter Its me
  • Start date Start date
I

Its me

Hi
I have 80 excel datasheets with identical headers in each
I want to bring them all into one sheet is this possible without cutting and
pasting each?
Many thanks in advance
(My first post)
Stephen
 
try
Consolidate under Data in the menu bar
--
Hope this is helpful

Pls click the Yes button below if this post provide answer you have asked

Thank You

cheers, francis

Am not a greek but an ordinary user trying to assist another
 
Place this macro in a regular module and execute from the destination sheet
1.

Sub bringinallsheetstoone()
For i = 2 To Sheets.Count
With Sheets(i)
dlr = Cells(Rows.Count, "a").End(xlUp).Row + 1
slr = .Cells.Find(What:="*", After:=[A1], _
SearchDirection:=xlPrevious).Row
.Rows(2).Resize(slr).Copy Rows(dlr)
End With
Next i
End Sub
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Copy specific data form sheets into master sheet 6
using the =page! feature to transpose a row to column 0
Count the columns from one sheet and paste it in another sheet 0
Copy or Move 3
How do I combine multiple tabs into one? 2
Combining Excel Files 0
presenting data on multiple sheet on one consolidated sheet 2
collecting fata from all sheets into one sheet 4

Back
Top