I have this folder you see containing about 60 different workbooks. I have this macro that goes into each one and copies certain data and pastes it into a summary workbook. The thing is, I have only just finished doing it for TWO people!! And that's taken me ages to record!!! Is there any way of telling the macro what to do, and commanding it to do it to all the workbooks in the folder as it's the same operation I need over and over again. The code is here:
Workbooks.Open FileName:= _
"bluehbennettCustomer Services DebtJoe Bloggs.xls"
Range("A2").Select
ActiveWindow.SmallScroll Down:=228
Range("A2:J250").Select
Selection.Copy
Windows("Statistics Collation.xls").Activate
Range("A4").Select
ActiveSheet.Paste
Range("A4").Select
Windows("Joe Bloggs.xls").Activate
Application.CutCopyMode = False
ActiveWindow.LargeScroll Down:=-8
Range("A1").Select
Sheets("Sheet1").Select
ActiveWindow.Close
I will be sooooooooo grateful if someone can help as I am completely stumped (as usual!). Thank you, thank you, thank you in advance
Janie
xxxxxxx
This message was edited by buntykins on 2002-04-25 07:48
Workbooks.Open FileName:= _
"bluehbennettCustomer Services DebtJoe Bloggs.xls"
Range("A2").Select
ActiveWindow.SmallScroll Down:=228
Range("A2:J250").Select
Selection.Copy
Windows("Statistics Collation.xls").Activate
Range("A4").Select
ActiveSheet.Paste
Range("A4").Select
Windows("Joe Bloggs.xls").Activate
Application.CutCopyMode = False
ActiveWindow.LargeScroll Down:=-8
Range("A1").Select
Sheets("Sheet1").Select
ActiveWindow.Close
I will be sooooooooo grateful if someone can help as I am completely stumped (as usual!). Thank you, thank you, thank you in advance
Janie
xxxxxxx
This message was edited by buntykins on 2002-04-25 07:48