js宏学习成绩总分与等级宏计算

znppnz

记录学习过程，加深印象。请各位大佬多多指点，本人刚学习几天js宏。vba也没学什么，只能简单修改别人的较简单的代码

1. function 分数等级(){
   
2.         for (let rngCell of Range("J2:J46")){
   
3.                 let intScore=rngCell.Value();
   
4.                 switch (true){
   
5.                         case intScore>=850:
   
6.                                 rngCell(1,2).Value2="优";
   
7.                                 break;
   
8.                         case intScore>=750:
   
9.                                 rngCell(1,2).Value2="良";
   
10.                                 break;
    
11.                         case intScore>=650:
    
12.                                 rngCell(1,2).Value2="中";
    
13.                                 break;
    
14.                         case intScore>=550:
    
15.                                 rngCell(1,2).Value2="还行";
    
16.                                 break;
    
17.                         default:
    
18.                         rngCell(1,2).Value2="非常差";               
    
19.                 }
    
20.         }
    
21. }
    
22. 
    
23. function 个人总分(){//如果是随机函数模拟的分数，要粘贴为值，保存后再执行
    
24.         var obj=Range("b2:i46").Value();//取值形成一个二维数组，一行形成一个一维数组，然后再组合成二维数组
    
25.         for (let strKey in obj){//for in获取obj数组的的索引或字典的键名？“索引似乎是一个字符串而不是数值”？
    
26.         let sum=0
    
27.         for (let i=0;i<=7;i++){//数组索引是从0开始的，i是从0而不是从1开始，开始没注意，好久才发现
    
28.                 sum +=obj[strKey][i];//obj[strKey][i]表示obj第strKey个元素中的第i个元素
    
29.                 Console.log(obj[strKey][i]);
    
30.                 Cells(Number(strKey)+2,"j").Value2=sum; //成绩是从第2行开始的，故要加2，如果是从3行开始，就加3
    
31. //                if (sum>=1000){
    
32. //                Cells(Number(strKey)+2,"j").Value2=sum;
    
33. //                        break;       
    
34. //                }
    
35. 
    
36.         }
    
37. //                Console.log(strKey);
    
38. //Cells(11,j).Value2=sum;
    
39.                 Console.log("+++++++++++");
    
40.                 Console.log(sum);
    
41.                 Console.log("---------------");
    
42.         }
    
43. }
    
44. 
    
45. 
    
46. 
    
47. function 个人总分dj(){//如果是随机函数模拟的分数，要粘贴为值，保存后再执行
    
48.         Application.ScreenUpdating=false;    //关闭屏幕刷新，程序复杂了，不关会明显的看到数据的填写过程
    
49.         var obj=Range("b2:i46").Value();//取值形成一个二维数组，一行形成一个一维数组，然后再组合成二维数组
    
50.         for (let strKey in obj){//for in获取obj数组的的索引或字典的键名？“索引似乎是一个字符串而不是数值”？
    
51.         let sum=0
    
52.         for (let i=0;i<=7;i++){//数组索引是从0开始的，i是从0而不是从1开始，开始没注意，好久才发现
    
53.                 sum +=obj[strKey][i];//obj[strKey][i]表示obj第strKey个元素中的第i个元素
    
54.                 Console.log(obj[strKey][i]);
    
55.                 Cells(Number(strKey)+2,"j").Value2=sum; //成绩是从第2行开始的，故要加2，如果是从3行开始，就加3
    
56.                 switch (true){
    
57.                         case sum>=850:
    
58.                                 Cells(Number(strKey)+2,"k").Value2="优";
    
59.                                 break;
    
60.                         case sum>=750:
    
61.                                 Cells(Number(strKey)+2,"k").Value2="良";
    
62.                                 break;
    
63.                         case sum>=650:
    
64.                                 Cells(Number(strKey)+2,"k").Value2="中";
    
65.                                 break;
    
66.                         case sum>=550:
    
67.                                 Cells(Number(strKey)+2,"k").Value2="还行";
    
68.                                 break;
    
69.                         default:
    
70.                         Cells(Number(strKey)+2,"k").Value2="非常差";               
    
71.                 }
    
72.         }
    
73. //                Console.log(strKey);
    
74. //Cells(11,j).Value2=sum;
    
75.                 Console.log("+++++++++++");
    
76.                 Console.log(sum);
    
77.                 Console.log("---------------");
    
78.         }
    
79.         Application.ScreenUpdating=true;     //打开屏幕刷新
    
80. }

复制代码

sunya_0529

JSA里的数组很好用，可以去试一下——

znppnz

sunya_0529 发表于 2024-8-11 21:22
JSA里的数组很好用，可以去试一下——

多谢指点，才学几天，还没学到。感觉数组很好用。想不到jsa还内置了那么多函数，理解了很多代码就简单了。

今铭昔

spaghetti8

使用ramda库,可以大大简化代码.

Again123456

今铭昔 发表于 2024-8-12 07:22

看来，thisArg还是常在实战中用用

今铭昔

Again123456 发表于 2024-8-12 08:40
看来，thisArg还是常在实战中用用

嗯，第二参thisArg还是有用处的

xd3210

今铭昔 发表于 2024-8-12 08:51
嗯，第二参thisArg还是有用处的

https://club.excelhome.net/thread-1698767-1-1.html,请铭佬指点下这个帖子！

znppnz

今铭昔 发表于 2024-8-12 07:22

这个方法好高级，=>我开始以为是推出符号，结果是=和>拼合成的，打出来确实一样的，感觉不专门学习太难理解含义了。这种高阶的js知识不知可以在哪里学习？请大神指点一下。

znppnz

sunya_0529 发表于 2024-8-11 21:22
JSA里的数组很好用，可以去试一下——

用内置函数那个勉强搞懂了，再次谢谢