Use this code 
Option Explicit

Dim Master As Workbook
Dim sourceBook As Workbook
Dim sourceData As Worksheet
Dim CurrentFileName As String
Dim myPath As String

Sub cons_data()

'The folder containing the files to be recap'd
myPath = "C:\Documents and Settings\hh\Desktop\Zoning\"

'Finds the name of the first file of type .xls in the current directory
CurrentFileName = Dir(myPath & "\*.xls")

'Create a workbook for the recap report
Set Master = ThisWorkbook

Do
    Workbooks.Open (myPath & "\" & CurrentFileName)
    Set sourceBook = Workbooks(CurrentFileName)
    Set sourceData = sourceBook.Worksheets("SE weekly pricing worksheet")
    
        With sourceData
            .Range("C10:X" & .Range("C" & .Rows.Count).End(xlUp).Row).Copy Master.Worksheets(1).Range("C" & Master.Worksheets(1).Rows.Count).End(xlUp).Offset(1, 0)
        End With
       
    sourceBook.Close
  
'Calling DIR w/o argument finds the next .xlsx file within the current directory.
CurrentFileName = Dir()
Loop While CurrentFileName <> ""

End Sub
Open your excel file. Press Alt+F11. You will see Microsoft Excel Objects on the left hand side. Right click and select Insert-> Module. Copy the code over. Go back to the excel file and select View->Macros and run the macro.

I saw blanks at the end of your data from row 42 to 47. So the code will check the last row of data and copy it over.