超级强大1：七年级新生分班，解决了重名与择班问题

aoe1981

达州张先生 发表于 2014-7-28 19:37
本人希望在你这个强大的“报名信息表”和“各班分表”分班中再增加1行表头（第1行-第2行之间增加一行空行 ...

　　您这样的要求以后最好尽早提出，这个“报名信息表”的第1、2行是关键行，动不得，牵一发而动全身！4个模块中每段代码都有大量的参数要修改，我反复测试了好多次，才改出来……这个附件不是一下子、两下子就完成的，前后经历了好几个阶段，跨越了好几天，幸亏当时加了必要的备注，但时间越长，总是感觉当时的备注有点少……呵呵
　　好的，言归正传，以下是附件，您再行测试下，看有没有问题，这个一定要细致地做，在怀疑中查！
　　 5七年级分班(两种分班方法，解决重名与择班，三行表头).rar (46.9 KB, 下载次数: 84)

2014-7-28 20:38 上传

点击文件名下载附件

aoe1981

jxndwxs 发表于 2014-7-28 19:12
老师好，我这点开始分班，出现……438 错误提示。

不好意思，您是点击“开始分班”出现的错误呀……这个，我在excel2010中运行是正常的呀，如果有可能，你在其他电脑上下载后再试运行一下，看看怎么样？

达州张先生

aoe1981 发表于 2014-7-28 20:38
　　您这样的要求以后最好尽早提出，这个“报名信息表”的第1、2行是关键行，动不得，牵一发而动全身！4个 ...

多谢多谢！

aoe1981

达州张先生 发表于 2014-7-28 21:32
多谢多谢！

希望能帮到您就好，最初也要感谢您的，呵呵！

达州张先生

aoe1981 发表于 2014-7-28 20:38
　　您这样的要求以后最好尽早提出，这个“报名信息表”的第1、2行是关键行，动不得，牵一发而动全身！4个 ...

多谢！如果加一段代码（请注释一下这段代码），将31楼“开始分班”按钮的分班班级号写入“报名信息表”的S列就完美了（作为初分班的对比），谢谢！

jxndwxs

aoe1981 发表于 2014-7-28 19:30
我这附件中有部分代码是在Excel2010中录制的，主要是排序的代码，您是在点击排序按钮后出现的错误吗？在e ...

我的是Excel2007，对不起，我这不能用。谢谢了。

aoe1981

达州张先生 发表于 2014-7-28 21:41
多谢！如果加一段代码（请注释一下这段代码），将31楼“开始分班”按钮的分班班级号写入“报名信息表”的 ...

　　这个相对容易，不过在人数多时，由于循环内部调用了单元格对象，速度会有点慢……　　请查阅下面的附件：
　　 6七年级分班(两种分班方法，解决重名与择班，三行表头).rar (49.57 KB, 下载次数: 66)

2014-7-28 21:54 上传

点击文件名下载附件

　　一开始以为这样做没多大必要，不过，现在可以看到分班方法是否正确……呵呵
　　目前是很清晰的：12345、23451、34512、45123、51234、12345……

达州张先生

aoe1981 发表于 2014-7-28 21:55
　　这个相对容易，不过在人数多时，由于循环内部调用了单元格对象，速度会有点慢……　　请查阅下面的附 ...

将这两句不要就不得出错了
Application.PrintCommunication = False
Application.PrintCommunication = True

达州张先生

aoe1981 发表于 2014-7-28 21:55
　　这个相对容易，不过在人数多时，由于循环内部调用了单元格对象，速度会有点慢……　　请查阅下面的附 ...

完美解决，多谢多谢！

达州张先生

aoe1981 发表于 2014-7-28 21:55
　　这个相对容易，不过在人数多时，由于循环内部调用了单元格对象，速度会有点慢……　　请查阅下面的附 ...

发现一个问题，择班生（是照顾对象）没有择到需要的班级去，如陈智聪择班需要到3班，而择班后到了四班，其他择班生也没有则到择班中去，而是分到了另外的班级。看看下面的附件，谢谢！
  已解决！谢谢！