给定一个数据集,假设有 10 列。在 A 列中我有日期,在 B 列中我有%。我想仅过滤 A 列 2014 年的数据,B 列 <70% 的数据,并将过滤后的数据复制粘贴到另一个工作表中。我该如何编写下一行的代码以获取第一行过滤数据?
ActiveSheet.Range("$A$1:$AR$1617").AutoFilter Field:=5, Operator:= _
xlFilterValues, Criteria2:=Array(0, "12/28/2014")
ActiveSheet.Range("$A$1:$AR$1617").AutoFilter Field:=14, Criteria1:="<0.7" _
, Operator:=xlAnd
最佳答案
使用 Offset
方法,如下所示:
ActiveSheet.Range("A1:AR1617").Offset(1, 0).SpecialCells(xlCellTypeVisible).Copy
以上代码复制过滤后的数据(不包括 header )。
这就是你正在尝试的吗?
关于vba - Excel VBA 过滤和复制粘贴数据,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/23673177/