Копирование рабочих листов из нескольких рабочих книг в текущую рабочую книгу

Привет, мне интересно, если вы, ребята, могли бы помочь мне?

Я пытаюсь скопировать несколько рабочих книг и просто сохранить их только на одном листе. У меня 2000 разных рабочих книг с различным количеством строк. Количество ячеек одинаковое, и оно не меняется, и все они находятся на первом листе в каждой книге.

Я новичок в такого рода вещах, поэтому я благодарен за любую помощь, которую вы можете предложить, я не могу заставить ее работать. Я использую Excel 2010

Это то, что я получил в банкомате:

Sub LoopThroughDirectory()
    Dim MyFile As String 
    Dim erow 
    Dim Filepath As String 

    Filepath = “C:\test\” 
    MyFile = Dir("test\") 

    Do While Len(MyFile) > 0 
        If MyFile = "master.xlsm" Then
            Exit Sub 
        End If
        Range(Range("a1"), ActiveCell.SpecialCells(xlLastCell)).Select
        Selection.Name = "PivotData" 
        Workbooks.Open (Filepath & MyFile)
        Range("A2:AD20").Copy 
        ActiveWorkbook.Close 
        erow = Sheet1.Cells(Rows.Count, 1).End(xlUp).Offset(1, 0).Row
        ActiveSheet.Paste Destination:=Worksheets("sheet1").Range(Cells(erow, 1), Cells(erow, 1))
        MyFile = Dir 
    Loop End
Sub