Macro to copy the data from excel file containing name "_res_av_" in folders and subfolders, copy the required data and paste in another excel file

[Swaroop Kavi]

Hello,
I am looking for a vba code to find an excel file containing file name "_res_av_" in folders and subfolders, open it, copy the content from A1:E10000, paste in another required excel file from A7 to E70007; G7 to K70007 etc. Note that there has to be an empty column between the set of data copied (For example, Column F, L etc., in this case). Also, Copy the excel file names into B2, H2, N2 etc cells.
Thank you

 

[JEC]

You can use the same method as I showed you before

Sub JEC()
   Application.ScreenUpdating = False
   jv = Split(CreateObject("wscript.shell").exec("cmd /c Dir ""C:\Users\xxx\Downloads\*_res_av_*"" /b/s").stdout.readall, vbCrLf)

   For Each it In jv
      If Len(it) Then
         With Workbooks.Open(it).Sheets(1)           
             your code.......

            .Parent.Close
         End With
      End If
   Next
End Sub