怎样在VBA的筛选语句(autofilter)中的criteria1后面引用数组?

怎样在VBA的筛选语句(autofilter)中的criteria1后面引用数组或用其他方法实现对另一个表中某一列大量数据的快速筛选?(数据量很大,我发现如果用循环的话,效率很低)
能否举个例子这段代码我参考一下?

试试用表格内的内置函数vlookup