Open 5 workbooks to make a report

HEllo!
I am today here to get some friendly information ...
if you know code then would be great if i could get it
From start .. i want to load 5 excel files from directory of folder .. okay we guess it will be (c:\folder)
and after that when i get those 5 files loaded to excel ... i would need to make a report from them ... in each file there is 12 sheets of information ...
and then i could slowly make up a code for
I think the code could start something like this

Public Function OpenWorkbook(mypath As String) As Workbook
     Workbooks.Open Filename:=mypath
     Set OpenWorkbook = ActiveWorkbook
 End Function

Private Sub open_workbook()
Dim wb As Workbook, ws As Worksheet
 Set wb = OpenWorkbook("C:\folder\")
 Set ws = wb.Sheets(10)
End Sub

If code is inncorect please let me know and provide please with workking code ... !
would be happy!