VBA: Copy sheets from separte files into another workbook?

It might be even easier than wiring code to just record a macro that does this. Record what your doing in a Workbook that you can save as a template. Then as it's recording go through the steps of what your want done.

Hope this helps,
Tyler

Sub allWorkbook()
'Standard Module code, like: Module1!
Dim f%, Wb

Application.ScreenUpdating = False

With Application.FileSearch
.NewSearch

'Option: Search Sub-Folders as well?
.SearchSubFolders = False 'Option: True or False!

'Option Current Folder or a defined folder?
.LookIn = CurDir
'Or
'.LookIn = "C:\myFolderNameHere"

'Option: Only Search this type of file?
.Filename = "*.xls"

.Execute

For f = 1 To .FoundFiles.Count
Set Wb = Workbooks.Open(Filename:=.FoundFiles(f))

'*************************************************************************
'Add your code her!
'*************************************************************************

ActiveWorkbook.Save
ActiveWorkbook.Close

Next f
End With

Application.ScreenUpdating = True
End Sub

Sorry, but do the workbooks (from which your gathering the information) names change?

thanks for the help so far. I'll try some of the suggestions.

No the names won't change. This is just something I got to do once. There's just so many workbooks that if I was to do it by hand it would take way too long.

Anyone have any other suggestions?

I got it now. Thanks for all the help!