Copying dynamic Range

[smartpat19]

Need a looping macro that will copy a dynamci range from a bunch of excel files and paste into a master file.

I can't get the macro to go beyond this line of code and I am not sure what the issue is.

Set wb = Workbooks.Open(Filename:=myPath & myFile)
Set Rng1 = wb.Sheets("CFT").Range("I53", Range("I53").End(xlDown).End(xlToRight)).copy

Any quick tips for fixing this error?

 

[shg]

  Dim wks As Worksheet
  
  Set wks = wb.Worksheets("CFT")
  Set rNg1 = wks.Range("I53", wks.Range("I53").End(xlDown).End(xlToRight))
  Rng1.Copy
  ' ...