Hello Kaby:
I'm not sure this is going to make sense, but here is a high-level
framework of how one might tackle the problem:
********************************
Sub ProcessFiles()
Dim sFile$
Dim master_workbook, sheet_name, Path_Name As String
Dim r as integer
'initialise variables
master_workbook = ActiveWorkbook.Name
sheet_name = "Master" 'where the data will be written
r = 1
'if you make a list of the paths to your specific folders, cycle through
'them using path_name variable using Do Until Cells(row, col)<>""
sFile = Dir(Path_Name & "*.xls") 'assumes source files will be *.xls file
types
Do While sFile <> ""
Workbooks.Open (Path_Name & sFile)
Worksbooks(master_workbook).Sheets(sheet_name).Cells(r,col).value =
Cells(row,col).value
'before the equal sign is where you will be writing the data
'after the equal is where on the source file you are pulling data
r = r+1 'increments row in master file
Loop
End Sub
*******************************************
There are many locally defined items which make it difficult to have
one-size-fits-all code.
Please let me know if this is useful, or if you have any further questions.
Cheers. chili.