VBA script help in Excel 2007

[WindowsUser]

Hi friends, I am using Excel 2007, I have a list of 80 images (All JPG files) on column A which mirror actual file names of files I have located in C:\photos.

My objective is to use Excel 2007 to batch rename all the files located in C:\photos from the names listed in column "A" to the names listed in column "B" that I have created.

I need a VBA script that will accomplish this task.
Thanks.

[Macarenas]

Here is a VBA script

Sub y()
    Dim cell As Range
    Const sPath As String = "C:\Photos\"
    
    For Each cell In Range("A1", Range("A1").End(xlDown))
        Name sPath & cell.Text As sPath & cell.Offset(, 1).Text
    Next cell
End Sub

[WindowsUser]

Thank you for the script.Script helped me out and saved my time