hi,
my first question here.

i have a excel file which has a list of .xml files stored in a column
ab 1.xml
** 2.xml
ef 3.xml


those files are stored in a subFolder like
a/00/1.xml
a/25/2.xml

now i'm looking for a macro code which will do these things.
1.search files in folder based on above table column.
2. Copy and paste them to a new folder.

i found this code in some other thread, but it "not responding"
Sub FileCopy()
Dim CL As Range
Dim FS As Object
Dim ScrDrv As String, DesDrv As String

ScrDrv = "D:\": 'CHANGE
DesDrv = "D:\Test\": 'CHANGE

Set FS = CreateObject("Scripting.FileSystemObject")

Application.Goto ThisWorkbook.Sheets(1).Range("A1"): 'CHANGE SHEET

For Each CL In Range("A1:A" & Cells(Rows.Count, "A").End(xlUp).Row): 'CHANGE COLUMN
If Not Dir(ScrDrv & CL.Value & ".xml", vbDirectory) = vbNullString Then FS.CopyFile ScrDrv & CL.Value & ".doc", DesDrv & CL.Value & ".xml"

Next CL

Set FS = Nothing

End Sub