Question

EXCEL 怎么将符合条件的表1的数据，复制到表2，最好是VBA

有两个表，清单1和清单2，清单2为空表，清单1有2000行数据
VBA
现在我想把表1中，第13列=2 或者 第13列=1且14列=0且15列=0的行都在表2中列出来，包括列头

如果筛选也能这样做，也行，但是不要移动顺序。

Answer 1

1.如下是一个Excel工作薄中的两张表，分别为Sheet1和Sheet2，下面分别以表1和表2来代替。要把表2中的语文成绩导入到表1中，但是从图中可以看出表1和表2名字并不一一对应。

2.选中表1，选中C2单元格，即语文项目中第一个要录入的成绩。选择“插入—函数”命令。

3.在“或选择类别”中选择“查找与引用”。

4.在对应的“选择函数”中选择“VLOOKUP”，点击确定。

5.在出现的“函数参数”面板点击第一个选项箭头处的按钮。

6.点击“张三”名字，即“A2”单元格，表示我们要查找“张三”的成绩，点击上面的按钮回到面板上。

7.点击第二个选项箭头处的按钮。

8.选中表2，同时选择A列和B列，然后点击上面的按钮。

9.因为在表2中语文成绩在第二列，所以第三项填入数字“2”。

10.第四项直接填入“0”即可，点击确定。

11.看到表1中张三的语文成绩出现了数值，该数值与表2相同。

12.选中C2单元格，用填充柄下拉，所有的语文成绩就从表2填入表1中去了。

Answer 2

用高级筛选。

在数据的最后一列后面（空开1列）输入参数，假设从X列开始：
X1、Y1、Z1分别输入第13、14、15列表头
X2、Y2、Z2分别输入2、0、0
X3输入1

数据－筛选－高级筛选，点将筛选结果复制到。。。
列表区域：选你原数据区域
条件区域：$X$1:$Z$3
复制到：AB1

确定就行了

Answer 3

增加辅助列
=IF((M1=2)+(M1=1)*(N1=0)*(O1=0),1,"")
筛选辅助列为1的 即可