excel用VBA代码提取特定区域符合条件的整行数据到新工作表

zhwaiwzq · 发表于 2015-7-21 18:57

各位大侠：本人菜鸟一个，统计学生成绩时要从学生成绩册中提取指定几个科目（只统计A卷，B卷不统计）都及格（要求≥满分的60%）的学生的所有数据到新的工作表，我做时是将不及格的成绩替换为空值，然后查找有空值的行，再删掉整行数据。结果运行速度比较慢，非常感谢zax010老师帮我做了修改，速度快多了。{:soso_e100:}不过还有个问题，就是这句
If arr(i, 4) >= 60 And arr(i, 6) >= 60 And arr(i, 8) >= 60 And arr(i, 10) >= 60 And arr(i, 11) >= 60 Then
中4列、6列、8列是固定的都是A卷需要统计，第5、7、9列不需要统计，但是从第10列到“A卷总分”这一列之前的都要统计，有时候还要增加科目，比如下图，能不能将列号做成通用的，麻烦了

朱荣兴 · 发表于 2015-7-21 23:30

提示: 作者被禁止或删除内容自动屏蔽

朱荣兴 · 发表于 2015-7-21 23:31

提示: 作者被禁止或删除内容自动屏蔽

zhwaiwzq · 发表于 2015-7-22 10:48

非常感谢朱荣兴老师，用你给的代码，我做了一点点改动完美解决我的问题。太感谢了，感谢你和zax010老师！

zhwaiwzq · 发表于 2015-7-22 11:05

本帖最后由 zhwaiwzq 于 2015-7-22 11:38 编辑

朱老师，还有个问题能帮我看看吗？
http://club.excelhome.net/thread-1218843-1-1.html

		自动登录	找回密码
密码			免费注册

朱荣兴朱荣兴当前离线性别保密 UID 1318548 阅读权限 0 注册时间 2011-2-2 在线时间小时最后登录 1970-1-1 积分 19282 财富分享技术精华头像被屏蔽 TA的精华主题 TA的得分主题	发表于 2015-7-21 23:30 \| 显示全部楼层 [广告] ★用Excel做企业管理系统，Excel服务器学习和下载★ 提示: 作者被禁止或删除内容自动屏蔽

	回复举报

朱荣兴朱荣兴当前离线性别保密 UID 1318548 阅读权限 0 注册时间 2011-2-2 在线时间小时最后登录 1970-1-1 积分 19282 财富分享技术精华头像被屏蔽 TA的精华主题 TA的得分主题	发表于 2015-7-21 23:31 \| 显示全部楼层 [广告] ★ 对Excel用户最友好的数据分析编程语言，再不发愁Excel计算困难和容量限制 ★ 提示: 作者被禁止或删除内容自动屏蔽

	回复举报