BEST code for LISTING and RENAMING files in any folder based on any extension Criteria

Hi Guys,
I worked really hard to get this solution. As I successfully completed it, so just sharing the code for your information and maybe improvement.
The function of this code is to RENAME the names of files based on their extension i.e. TXT, PDF, DOC etc in ANY folder chosen through a dialog box. You have to first used the routine "GetFileNames" to get all the file names in COLUMN-A of any empty excel sheet. Then do any formatting to the name of file in COLUMN-B (adjacent cells). Then you can rename the file names of COLUMN-A based on new names in COLUMN-B. Please don't change the full path or anything. Just change the ending part of file name (without path).
Regards and Cheers

Please Login or Register  to view this content.

This code gonna make my life lot easier now on

Thank you for posting this. It will surely help someone out here.