Run Time Error 9 - Subscript out of range

Got around it by using this:

TargetCol = ctr

Get the column number when i paste the name in earlier in the script.


Then:

Rng2.Find(What:=c).Offset(, 7).Resize(, 7).Copy Destination:=c.Offset(, TargetCol - 1)

and it works toooo

Regards

JRidge