Loop through closed workbooks and post data in specific sheet

[YasserKhalil]

Hello everybody
I have Main WB file which contains the following code

Please Login or Register  to view this content.

The code works fine but I need to improve it ..I need the best performance as I have a lot of workbooks
I'm seeking to loop through all close workbooks in the folder named "Files" and post data in Sheets("Basic") in range("A6") and Range("B6") according to data in thisworkbook.range("A2:A6")

Thanks advanced

[YasserKhalil]

I just need professionals to edit the code so as to give me the results at high speed as I will deal with alot of closed workbooks

[YasserKhalil]

I'm still waiting for the best performance