Macros to remove characters from file name and add some to worksheet

[Poppaby]

Hi all

I have a folder that has a number of excel files with names in the format XXXXX_XXX_XXXX_XXXXXXXXXXXXXXXXX

I need a Macros that will rename the file by removing the XXXXX_XXX_XXXX_ (basically the first 15 characters)

Additionally, I would like to add the first 5 removed characters (example, 20014) to the actual worksheet tab in a column called ENTITY after the last column that has data in the worksheet

Any help would be appreciated

Edit: there is only one tab in each worksheet, but the names are not consistent

Edit: Two separate macros would be fine, I dont need this all in one script

Dave

 

[Poppaby]

Hi all

Any help here would be greatly appreciated