Find a value in a column and copy all data above that row code not working.

Hi all,
I've been trying to modify the following code to find the value "Module Index" in column A. I then need the code to save the row number that the value was found in and copy a range from ("A2:V row number")

I keep getting an "object required" error on the following code line

Set intFindrow = wbTargetBook.Sheets(strName).Range("A:A").Find(What:="Module Index", LookIn:=xlValues)

I'm very new to this so the solution could be very easy or very complicated . Any help would be greatly appreciated!

Please Login or Register  to view this content.

Thanks Solus, Works great!