Copy sheets from different workbooks to specific sheets in one workbook

In a sheet named "Master.xlsm", I run the following Macro below for 65 files. Now the code below is copied 65 times in which I have to change AA to AD or EA or GD and so forth.

How can I create a loop that opens every available (!) OP2012-**-Versie1.xlsm and copies the contents of the sheet "programmaresultaten" to a specific sheet in Master.xlsm? See code below for the first of 65 files.

Please Login or Register  to view this content.

In a remote column (any unused column), enter the alphabets denoting the file names. Then using a loop, refer to the cell using a variable. Substitute the alphabet with the variable.

for eg. if you enter all the 65 alphabets in column AA. So you need to have a loop to start from row 2 and proceed to row 66 (considering row 1 is your header for the column) one by one. So have a variable - maybe sname which will take the value from your column AA. (Sname=range("AA" & i).value). Then start your code with the For loop and in the file name, put in the "Sname" instead of your alphabet.

Let me know if you have any difficulty in understanding the above.