Copy unique values from autofilter

On my "View2Pivot" worksheet I have an autofilter applied. I want to copy only the unique, visible items from the second column in my autofilter range. I was hoping this code would do it for me, but I'm getting an error message saying "Object Variable or With Block Variable not set"

Worksheets("View2Pivot").AutoFilter.Range.Columns(2).AdvancedFilter Action:=xlFilterCopy, _
   CopyToRange:=Wks.Range("F:F"), Unique:=True

Here's the full macro:

Sub PertPacsOne()
Dim Rng As Range
Dim Wks As Worksheet

Set Wks = Worksheets("Lookups")
Set Rng = Wks.Range(Wks.Cells(2, "F"), Wks.Cells(Rows.Count, "F").End(xlUp))

Wks.Range("F:F").ClearContents
Worksheets("View2Pivot").AutoFilter.Range.Columns(2).AdvancedFilter Action:=xlFilterCopy, _
   CopyToRange:=Wks.Range("F:F"), Unique:=True

    
    ThisWorkbook.Names.Add "PertPacs1", Rng
    Addx = Range("PertPacs1").Address

End Sub

You can't apply an advanced filter and an autofilter at the same time. You'll have to loop through the visible cells of the relevant column and add them to a collection (or dictionary) to get unique records.