excel - 选择过滤值并将选择应用于第二个工作簿中的不同过滤器

Question

我想在工作表中选择一些过滤的单元格并将选择应用于第二个工作簿中的过滤器。

我用在这里找到的修改后的代码进行了尝试。

Sub Test()
    Dim Arr As Variant
    Dim i As Integer
    Arr = WorksheetFunction.Transpose(WB_Macro.Sheets("Current Stage").Selection.Value)
    For i = LBound(Arr) To UBound(Arr)
        Arr(i) = CStr(Arr(i))
    Next i
    Selection.AutoFilter
    WB_New.Sheets("Consolidated EOY ´20-CO20-21").Range("$A$2:$C$1048576").AutoFilter Field:=7, Criteria1:=Arr, Operator:=xlFilterValues
End Sub

有人可以帮助我吗？

标签： excelvba