接受多个用户输入并存储在Excel中的另一个工作表中

时间:2016-10-11 18:28:52

标签: excel vba excel-vba advanced-filter

我试图编写一个简单的宏来简化过滤,让高级用户看起来更有吸引力。我无法弄清楚如何接受多个输入来自我已经制作的(数据验证)下拉菜单,将它们放在另一张纸上的列中是用作过滤器的数组。我需要为8个不同的问题"做这个。

请帮忙。

现在,这篇文章背后没有代码。但是迭代数组的代码看起来像这样

 Dim N As Long, r As Range
With Sheets("Workingsheet")
        N = .Cells(Rows.Count, "A").End(xlUp).Row
        ReDim ary(1 To N)
        For i = 1 To N
            ary(i) = .Cells(i, 1)
        Next i
End With

    My_Range.AutoFilter
   My_Range.AutoFilter Field:=22, Criteria1:=ary,     Operator:=xlFilterValuesenter 

0 个答案:

没有答案