考试成绩三率统计

lsc900707 · 发表于 2016-5-2 19:34

Range(Cells(20 * ks + 3, k * (bj + 3) + 1), Cells(20 * ks + 3 + (bj + 2), 20 * (k + 1))).Cut
无法对合并单元格进行此操作！老师这是我换另一个年级的成绩测试的时候出现的问题！弄不明白怎么回事。不过，学生人数和班级数有变化。

lsc900707 · 发表于 2016-5-4 20:46

等结果呢，好像是条件变化导致转置的问题！

lzqlaj · 发表于 2016-5-4 22:52

上传附件看看什么原因。

lsc900707 · 发表于 2016-5-5 22:23

本帖最后由 lsc900707 于 2016-5-5 22:36 编辑

网站问题来了，这几天发不了附件，也下载不了附件。

lsc900707 · 发表于 2016-5-5 22:47

老师，要不qq或微信聊 qq1512381669 电话18979900780微信绑定

lzqlaj · 发表于 2016-5-6 22:27

For k = 1 To ks - 1
   'Range(Cells(20 * ks + 3, k * (bj + 3) + 1), Cells(20 * ks + 3 + (bj + 2), 20 * (k + 1))).Cut
   Range(Cells(20 * ks + 3, k * (bj + 3) + 1), Cells(20 * ks + 3 + (bj + 2), 20 * (k + 1))).Select
   Selection.Cut
   Cells(20 * ks + 3 + k * (bj + 3), 1).Select
   ActiveSheet.Paste
Next k

lsc900707 · 发表于 2016-5-7 19:06

本帖最后由 lsc900707 于 2016-5-7 19:07 编辑

老师，经反复测试，仍有错位现象。可是这里发不了附件。我发你QQ了。还请你抽出宝贵时间修改好。

奇怪，我下午居然发不了。

lsc900707 · 发表于 2016-5-8 14:41

感谢老师深夜帮我解决疑难问题。谢谢！

lsc900707 · 发表于 2016-5-21 17:50

大师，今天我把你的“三率统计”和“分数段统计”合成一个完美的程序了，心里特高兴。再次谢谢你的无私奉献。

lsc900707 · 发表于 2016-6-3 21:50

增加“名次段统计”和“N名提取”两个模块！

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