excel问题：我想做这样一个表格！下面有图片，有说明

要实现这个功能，实际上就是表1筛选出符合条件的行，复制到表2 中，考虑用宏来实现方便一些。
表1或表2中建一个命令按钮，代码中输入以下内容。
Sub 按钮1_Click()
Sheets("Sheet1").Select
Range("A8:G18").Select
Range("G18").Activate
Selection.AutoFilter
ActiveSheet.Range("$A$1:$D$4").AutoFilter Field:=7, Criteria1:="1"
Selection.Copy
Sheets("Sheet2").Select
Range("A3").Select
ActiveSheet.Paste
Sheets("Sheet1").Select
Range("A8:G18").Select
Range("G18").Activate
Selection.AutoFilter
End Sub
点击按钮即可在表2 中得到所需内容。

其实就是录制一个宏，等于是把筛选和复制的过程操作一次。

VBA编程实现，有很多细节问题需要考虑：筛选、区域扩充、数据清除等

数据--导入外部数据