OK I honestly didn't think that this one was that tricky so in the interests of keeping the thread alive, if there are no more questions or requests for clues I'll put the link up and whomever wants to take over can go for it.
I have a function that pretty much does this, hopefully it might help you if you can modify it to your needs
Function Output_Fact_Hrs_Excel(FPAth As String)
On Error GoTo ErrorHandler
Dim fName As String
Dim strSheet As String
Dim MyFile As String
Dim appExcel As Object
Dim MyBook As Object...
It had me scratching my head for a while and some furious googling
It was also the most 80's song I've heard in quite some time and it's left me more than a bit traumatized I can tell you...
Maybe it should be your turn again since we got all out of sequence...?