move files through excel

[Xtremetechnology]

dear sir,
i have a utility to move files from excel but this utility is not working for ".mp3" files. ".wav" are moving perfectly but ".mp3" files are not moving
please help


Sub MoveFiles()
Dim i As Long, LastRow As Long
LastRow = Range("A65536").End(xlUp).Row
For i = 1 To LastRow
Name Cells(i, 1).Value As Cells(i, 2).Value
Next i
End Sub

 

[StephenCrump]

Can you provide an example of what's in column A and column B for an .mp3 file that's "not working"?

And what exactly do you mean by "not working"? Are you getting an error message? If so, what is the message?