Macro to Filter values in Range

[Sunvisor]

I have a macro with something like:

 ActiveSheet.ListObjects("Table_New_DB_late.accdb").Range.AutoFilter Field _
        :=2, Criteria1:=Array("CHE04368", "CHE06159", "CHE06468", "CJK00683", "CJK00696" _
        ), Operator:=xlFilterValues

But lets say the Criteria comes from a Range defined as "Serials"

How could I set the Criteria1:=Array to the values of each cell in range Serial?