Copy row if value found in column "A" matches and paste to a different workbook.

[taylorsm]

I need to copy a row from one workbook/worksheet to another workbook/worksheet based on the value in column "A". I have tried a dozen different codes I found online and have been unsuccessful in figuring it out. No clue where I went wrong.

I need every row with "Jane" in column A in workbook1 to copy to workbook2("A5"). Jane may not be grouped together in column A, so it will have to search the entire column, or sort it.

After doing this, I will do the same thing for "Billy" but in a workbook3.

attached is a workbook of the source data, the target sheet will look exactly the same, minus the data in "A5" and below.

Sheet name on both = "Audit Tracker"
workbook1 = Jane's Tracker
workbook2 = taylorsm's tracker
workbook3 = Billy's Tracker

[taylorsm]

I am working on something, but I receive a Invalid or unqualified error on

Set aRng = a.Sheets("Audit Tracker").Range("$A$4:A" & ws.Cells(ws.Rows.Count, "a").End(xlUp).Row).AutoFilter
.AutoFilter Field:=1, Criteria1:="Jane"

How can I get that to work?

[jaslake]

Hi taylorsm

For some reason the Forum will not allow me to paste Code from the Clipboard directly into the Forum...see Module 5 in the attached.

[taylorsm]

Thanks so much!

[jaslake]

You're welcome...glad I could help. Thanks for the Rep.