当前位置: 首页 > 办公技巧 > 正文

wps办公技巧登记表(WPS JS宏在中小学教师中的应用)

  • 叁碗诸角 叁碗诸角
  • 办公技巧
  • 2023-08-29 05:24:13
  • 0

经常有一些教师朋友有一些学生成绩、扣分检查、数据报表需要汇总,今天就有一位教师朋友找我定制一个汇总功能。

需求如下:

汇总登记表各班的扣分情况,然后填写至汇总表,实现对扣分情况的自动汇总。

登记表

汇总表

我们的思路,循环登记表每行数据,做一个字典,把每个班级的扣分进行汇总,然后根据字典的键对汇总表对应的位置进行填充。代码如下:

function test(){var dicGao=new Map();var dicDi=new Map();for(var i=2;i<9;i ){var dateTime=ActiveSheet.Range("A" i).Value()if(true){var banji=ActiveSheet.Range("E" i).Value()var ban=banji.split('-')[0]var duan=ban.charAt(0)var koufen=ActiveSheet.Range("F" i).Value()if(duan>3){if(dicGao.has(ban)){dicGao.set(ban,dicGao.get(ban) koufen)}else{dicGao.set(ban,koufen)}}else{if(dicDi.has(ban)){dicDi.set(ban,dicDi.get(ban) koufen)}else{dicDi.set(ban,koufen)}}}}var tss=dicDi.get("11")Worksheets("各班汇总").Range("C9").Value2=dicDi.get("11")Worksheets("各班汇总").Range("D9").Value2=dicDi.get("12")//Range("J1").Resize(dicDi.size,2).Value2=[...dicDi]}

代码写好后,我们插入一个按钮,并点击右键指定宏为刚才我们编写的函数,编辑按钮上面的文本为“一键汇总”。最后另存为.xlsm格式即可。

最终效果


最新文章