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

[molonlabe]

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 the source would be workbook3.

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

 

[molonlabe]

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?