How to rename file according to vlookup value?

[london7871]

The cells A1 to B5 in excel are :

AAA 1
BBB 2
EEE 5
DDD 4
CCC 3

How to rename the following email files in C:\
AAA
CCC
EEE

as follows:
1
3
5

[bakerman2]

Try this.

Please Login or Register  to view this content.

[london7871]

It is regret that the VBA not work.

Please note that the following not work in my excel:
OldName = "C:\Users\DK-01\Desktop\Renaming\CCC"
NewName = "C:\Users\DK-01\Desktop\Renaming\1"

Name OldName As NewName

but the following VBA is OK:


OldName = "C:\Users\DK-01\Desktop\Renaming\CCC.msg"
NewName = "C:\Users\DK-01\Desktop\Renaming\1.msg"

Name OldName As NewName

[bakerman2]

You didn't mention any extension in your first post (and I don't have a cristal ball), but it's pretty obvious that that's a part of the filename".

[london7871]

Thanks bakerman2.

[bakerman2]

You're welcome and thanks for rep+.