ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

搜索
EH技术汇-专业的职场技能充电站 妙哉!函数段子手趣味讲函数 Excel服务器-会Excel,做管理系统 效率神器,一键搞定繁琐工作
HR薪酬管理数字化实战 Excel 2021函数公式学习大典 Excel数据透视表实战秘技 打造核心竞争力的职场宝典
让更多数据处理,一键完成 数据工作者的案头书 免费直播课集锦 ExcelHome出品 - VBA代码宝免费下载
用ChatGPT与VBA一键搞定Excel WPS表格从入门到精通 Excel VBA经典代码实践指南
楼主: aoe1981

[原创] 超级强大1:七年级新生分班,解决了重名与择班问题

  [复制链接]

TA的精华主题

TA的得分主题

发表于 2014-7-31 08:30 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
本帖已被收录到知识树中,索引项:模板和开源系统
wxnxl 发表于 2014-7-31 08:13
不是很好用,是相当的好用!
我正有此打算,将这两个程序合并一下。
不知能不能搞定。。。。

只不过那程序有一点点不足,就是复制其他工作表中的的数据,分表后,表中只有标题和字段行(只有两行),没有其他内容。

TA的精华主题

TA的得分主题

发表于 2014-7-31 08:30 | 显示全部楼层
jxndwxs 发表于 2014-7-31 08:25
只可惜我不会VBA,更不会修改程序。只是按能通用的思路设想。

应该说这两个程序都各有各的优点
如果能将其整合,确实是件好事

1.楼主的分班办法,所谓“12345,23451”,这也是我们手工分班时一直采用的,确实比较平衡。
但我以前看到过一个EXCEL软件(共享版)真正的分得平均,而且是每一科的分数都平衡!!!!

2.楼主的先分再统一调整,解决择班生的思路。

3.你发的多条件,多功能的软件。也有优点,就是对于统计这一块做的比较好。
而且代码写的很优秀,速度相当快!

TA的精华主题

TA的得分主题

发表于 2014-7-31 08:35 | 显示全部楼层
aoe1981 发表于 2014-7-31 08:26
前面张先生好像更在意分班后生成的分班信息表,能够包容更多的信息,可以直接拿来给各班主任使用,所以又 ...

是呀,你只想到满足一个人的需求。
至于打印,多工作表一起设置页面,也用不了多少时间。
这个程序是针对编班而设置的,也不可能做到万能。(我说的万能是对编班而言,是万能的)

TA的精华主题

TA的得分主题

发表于 2014-7-31 08:40 | 显示全部楼层
wxnxl 发表于 2014-7-31 08:30
应该说这两个程序都各有各的优点
如果能将其整合,确实是件好事

多条件,多功能的软件  是  hlly888 老师按我的思路帮我做的。我不会VBA,你多于hlly888老师沟通。希望做出一个通用性强、实用的软件。

TA的精华主题

TA的得分主题

 楼主| 发表于 2014-7-31 09:06 | 显示全部楼层
jxndwxs 发表于 2014-7-31 08:35
是呀,你只想到满足一个人的需求。
至于打印,多工作表一起设置页面,也用不了多少时间。
这个程序是针 ...

如果照这样,用到的关键字段不多,其余的都可以不要了:
1.分班:性别、总分、班级
2.重名:姓名
3.择班:择班
4.恢复表格顺序:序号或学号
共6个字段,如果原始表可以简化保留必要的,则确实省去不必要的麻烦……内容越少,越核心,则通用性越强,但不见得大家都乐于接受,这样生成的报表信息是不完整的……

TA的精华主题

TA的得分主题

发表于 2014-7-31 09:16 | 显示全部楼层
aoe1981 发表于 2014-7-31 09:06
如果照这样,用到的关键字段不多,其余的都可以不要了:
1.分班:性别、总分、班级
2.重名:姓名

这样最好。
“这样生成的报表信息是不完整的……”,这种现象是不会出现的。
比如根据各校要求:需要身份证号、家长姓名、联系电话、……  可以在“学生信息表”中增加呀。
当然,你在做程序时,生成的分班表,要和“学生信息表”中的信息一样,并能正常显示(特别注意身份证号、联系电话等的格式)

TA的精华主题

TA的得分主题

发表于 2014-7-31 09:18 | 显示全部楼层
本帖最后由 达州张先生 于 2014-7-31 09:22 编辑
aoe1981 发表于 2014-7-31 08:26
前面张先生好像更在意分班后生成的分班信息表,能够包容更多的信息,可以直接拿来给各班主任使用,所以又 ...


各班分班表加入一行空白后,我还在分班表中设置有人数、性别、总分统计呢,请见附件,只是择班后分班表中的总分统计没有作用,请指教了,谢谢!
希望将下面3句代码给我加到择班按钮中去,能执行就好,我没加进去。谢谢
[A2] = "总人数:" & [b4].End(xlDown).Row - 3 & "人"  '本期总人数计算  'b3单元格向下最后一个非空单元格的行数减去表头2行即学生人数,加上单位“人”
        [E2] = "女:" & Application.CountIf(Range("D3", "D" & [C3].End(xlDown).Row), "女") & "人" '本期人数女计算
        [G2] = "=""总分:""&SUM(R4C17:R150C17)&""人""" '计算总分R4为第四行,C17为第17列

6七年级分班(解决重名与择班,三行表头)3-2.rar

55.5 KB, 下载次数: 24

TA的精华主题

TA的得分主题

发表于 2014-7-31 09:24 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助
本帖最后由 jxndwxs 于 2014-7-31 09:25 编辑
aoe1981 发表于 2014-7-31 09:06
如果照这样,用到的关键字段不多,其余的都可以不要了:
1.分班:性别、总分、班级
2.重名:姓名


还有,重名查找方法我想可以样(我不会VBA,不知道行不行):
先按姓名排序,查找同姓名的学生(应该在相邻的行),并用红色(其他颜色也行)显示,便于方便查看。
再用手动将同名学生择班编班,同时,要求择班的学生也进行择班。
然后,按性别、总分排序,再分班。
最后,进行程序择班。
这样行不行?

TA的精华主题

TA的得分主题

 楼主| 发表于 2014-7-31 09:28 | 显示全部楼层
jxndwxs 发表于 2014-7-31 09:24
还有,重名查找方法我想可以样(我不会VBA,不知道行不行):
先按姓名排序,查找同姓名的学生(应该在 ...

可以呀,我是选定,你这是填充颜色……其实一样……只是选定操作可能需要反复进行……呵呵

TA的精华主题

TA的得分主题

发表于 2014-7-31 09:30 | 显示全部楼层
aoe1981 发表于 2014-7-31 09:06
如果照这样,用到的关键字段不多,其余的都可以不要了:
1.分班:性别、总分、班级
2.重名:姓名

建议老师将你设置的程序和“多条件,多功能的软件”两个程序取各自的长处,合并在一起。这样真能称得上十全十美了。
您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

手机版|关于我们|联系我们|ExcelHome

GMT+8, 2024-11-18 20:39 , Processed in 0.045461 second(s), 7 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

沪公网安备 31011702000001号 沪ICP备11019229号-2

本论坛言论纯属发表者个人意见,任何违反国家相关法律的言论,本站将协助国家相关部门追究发言者责任!     本站特聘法律顾问:李志群律师

快速回复 返回顶部 返回列表