Macro to list files then Rename them

Hi, this should be what you need.
When run a dialogue box will apear to selct the folder you want.
then it will pass all the file in the folder to column A

Please Login or Register  to view this content.

Code copied from http://mariaevert.dk/vba/?p=99

Hi, it works fine for me.
the browser will open, select the folder you want, open it and then click ok.
It will then pass every file name into column A.

Sorry i dont understand the part about renaming them
you will need to be clearer on what you require.

i dont know why your code is not working; Ok let me explain, forget about the macro to list all files in the folder; lets say i already list all files in the folder in column A, i will write the new name in column B then i want macro to take the new name in column B to rename the fie name it self

example;
Cell A2 = New.mp4
Cell B2 = ggffrr.mp4

thanks

Hi, i just tried the above code and it worked fine for me.
How are you renaming the files?
i have attached screen shot of what worked for me.

When it renamed them it did not change the location

hi

sorry about my late reply, was very busy, actually i still have problem, the code is working perfectly but still i have the problem which i post in post#6

any one can have a look to the 2nd code which is "Sub Rename_Files()"

if i run the renaming macro will pop up to me to browse where i want to put the new files;
1- if choose new location / new folder...nothing will happened.
2- if i choose the same old location....the macro will work but it will move the files to desktop.

what i want is to rename the files and to copy them to the new folder i choose without touching the old folder / old files

thanks

The rename code from the file in post# 11 didn't work for me either. I had to adjust it to what you see below. The adjusted code I'm posting here works for me. See if it works for you.
If so, please mark this as solved and click the star below. Thanks!

Please Login or Register  to view this content.