
excel中如何用VBA筛选数据生成新表
2个回答
展开全部
假设数据在a到m列,从第2行开始(表头为第2行),代码如下:
sub
test()
activesheet.range("a2:m999").autofilter
field:=2,
criteria1:="投资"
range("a2:m999").copy
sheets.add
after:=sheets(sheets.count)
range("a2").select
activesheet.paste
end
sub
sub
test()
activesheet.range("a2:m999").autofilter
field:=2,
criteria1:="投资"
range("a2:m999").copy
sheets.add
after:=sheets(sheets.count)
range("a2").select
activesheet.paste
end
sub
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询