Save File As Cell Value (loop through folder)

Hi there

I'm wanting a macro which will loop through a folder (F:\test folder) and open each file
I would then like to rename the file based on the contents of Sheet2 cell D3 (d3 is simple the name of a region, eg, "midlands")

The file should then be saved to "F:\new folder" and the workbook closed down
The macro will then look at the next file in the folder and repeat the process

This may be a problem - some files are .xls and others are .xlsm

Any ideas? I've found similar macros however have not been able to adapt them at all

Thanks

Do you know all the filenames before you start?

Have a look at/search for the VBA Dir function to loop through the files. Use the Macro Recorder to get code for opening workbooks and saving as. Use string functions like InstrRev and Mid to handle the different file extensions.

Hi Dennis,

Unfortunately I would not know all the files which are in the folder to be renamed.

Any ideas?