添加第三个条件以自动过滤VBA

Question

我想在我编写的代码中添加一个附加的第3条标准，该标准会自动过滤设置范围内的“ RENT”和“ emprent”值。我想添加“ rtna”作为第三个条件。

Sheets("Filter").Activate
With ActiveSheet
    .AutoFilterMode = False
    .Range("P1:W10000").AutoFilter Field:=1, Criteria1:=Array("RENT", "rtna", _
                                    "emprent"), _
                    Operator:=xlFilterValues
End With