Import values from other files in folder

Hello - Thanks for taking the time to read this thread.

I need a macro that imports the value from a specific cell from all the spreadsheets in the same folder as the workbook running the code.

This is my "failed" attemp. It works on my pc but doesn't work on other people's pc (they have older versions of excel). So I guess there must be a much better way to do this

Please Login or Register  to view this content.

What I lack the skills to do
I would really like a code that could import the value from cell: Worksheets("Efficiency").[I4], from any spreadsheet in the same folder as thisworkbook no matter what fileextension it has if the spreadsheet has a value in that cell (should of course skip looking in the spreadsheet running the code, which will be in the same folder as the different status reports).
It would be great if the code could detect the users application.screenupdating status and set it to their prior setting after the code (no clue if this is possible).

Hi
In your code trying change "xlsx" to "xl*". This should fix your issue.
Tony

Hi Tony

Just tried change "xlsx" to "xl*" but it cycles through the spreadsheets without opening them, doesn't seem that the wildcard works AND this would also try to open the excel file running the code, which is in the same folder - and that would stop the code from running

After some trial and error I ended up with this code that works

Please Login or Register  to view this content.

Still have some small things on my to do list but I'm pretty satisfied so far

Hi
Thanks for the feedback. Pleased you managed to resolve your issue.
Tony

The final code looks like this if anyone else is facing the same issues

Please Login or Register  to view this content.