For Each Next Assistance on Copying data from Multiple Worksheets

I have worked through the search forum and actually incorporated a portion of RoyK's code from a like-kind thread, but can't seem to get it going. I appreciate the assistance.

Ultimate Goal:
- Click Event imports tabular data from 5 worksheets from a user-chosen source workbook and pastes to next available row + 1 (x1up + 1) in destination workbook.

Here is my basic import code:

Sub ImportData()
'
' Import Macro
'
Dim strWorkbookName As String
Dim strImportFileName As String
pAbort = False
    
'Get the current workbook name.
    strWorkbookName = ActiveWorkbook.Name
    
' Open Area 1 file for import.
    Filename = Application.GetOpenFilename(FileFilter:="Excel Files (*.xls),*.xls", Title:="Select the Metro Area Data File")
    If Filename = False Then
        MsgBox "No file was selected! Exiting..."
        Range("A1").Select
        pAbort = True
        Exit Sub
    End If
    
    Application.ScreenUpdating = False
   
    Workbooks.Open Filename
    strImportFileName = ActiveWorkbook.Name
    Range("A1:L62").Select
    Selection.Copy
    Windows(strWorkbookName).Activate
    Sheets("Metro").Visible = True
    Sheets("Metro").Select
    Range("C1").Select
    Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
        False, Transpose:=False
    Sheets("Metro").Visible = False
    Windows(strImportFileName).Activate
    Application.CutCopyMode = False
    ActiveWorkbook.Close
    
    Sheets("Master").Select
    Range("A1").Select
    Application.ScreenUpdating = True
    MsgBox ("Data compilation complete")

End Sub

And here is the code I pulled from RoyK in another thread that utilizes the for each next:

Option Explicit

Sub GetData()
    Dim fn
    Dim wbFrom As Workbook
    Dim ws     As Worksheet
    Dim rCopy  As Range
    Dim sSht   As String
    On Error Resume Next
    fn = Application.GetOpenFilename  'can add parameters. See help for details.
    If fn = False Then
        MsgBox "Nothing Chosen", vbCritical, "Select workbook"
        'now that you have the  name, you can open it
    Else: Workbooks.Open fn
        'set variable to source workbook
        Set wbFrom = ActiveWorkbook
        For Each ws In wbFrom.Worksheets
            With ws
                sSht = .Name
                'determine range to copy
                Set rCopy = .Range(.Cells(2, 1), .Cells(.Rows.Count, 3).End(xlUp))
            End With
            'copy to relevant sheet in master wb
            If Not rCopy Is Nothing Then rCopy.Copy _
               ThisWorkbook.Worksheets(sSht).Cells(Rows.Count, 1).End(xlUp).Offset(1, 0)
        Next ws
    End If
    On Error GoTo 0
    Set rCopy = Nothing
    Set wbFrom = Nothing
End Sub

I need help incorporating the for each next such that it pulls the range of A1:L62 from each of the 5 worksheets and pastes them either (I don't particularly have a preference)

1. Into 1 worksheet - such that each next worksheet range is pasted below the previous + 1 row; or
2. Into 5 worksheets

Thanks!!!