如图，要求以班级名称为筛选条件，将自动筛选的结果复制到其他区域。

打开Visual Basic，添加模块和过程，称之为“自动筛选”。

添加自动筛选的代码，筛选的区域就是成绩数据区域，筛选列为第二列“班级”，筛选条件是H2单元格的字段。

执行以上代码后，可以看到成绩区域已自动筛选出结果。

添加将筛选出来的结果复制到J列至O列的代码。

添加复制完结果后取消筛选的代码。

执行以上代码后，即可看到筛选的结果已复制过来了。

但是当修改筛选条件为E班（只有一条数据）时，发现原来A班的筛选结果为清空，E班的结果只是覆盖了之前A班结果的第一行。

解决上面问题需要在筛选之前添加清空结果区域的代码，再次执行后即可按预想效果筛选并复制结果。

以上示例仅用于演示。