Copy multiple files from one folder to other using the file names given in excel.

[anks.sjcit]

Hi,

Can anyone please help me code a macro for the below case:

I need to take the file names from the excel sheet and copy all the files from a folder to another..

Thanks.

[mdmackillop]

Sub Test()
Dim Source As String, target As String, f
Source = "C:\Fld1\"
target = "C:\Fld2\"
For Each f In Selection
FileCopy Source & f, target & f
Next f
End Sub