JSA 这样的统计能做吗，求饶大神留步

gojswung

希望大神代码 简单点我作为学习  来学习学习
附件已上传
统计春夏秋冬.zip (41.32 KB, 下载次数: 16)

2022-9-19 23:12 上传

点击文件名下载附件

ctp_119

肯定能做！！！只是愿不愿意的问题！！！时间问题

gojswung

var ws = ["report", "JSA运行结果"].map(v => Worksheets(v));
        var arr = ws[0].Range("A1").CurrentRegion.Value2.slice(1);//获取每一行 切片成数组，每一行是一个数组
        Console.log(arr.length)
        var m = new Map();
       
        arr.forEach(v => {
                let keys = [/(2022)/.test(v[17]) ? "新款" : v[17], v[16], v[14]].map(w => w);  //v[17]是商品代码  //v[16]小类名称 是女鞋 男鞋   //v[14]] 是季节名称
                Console.log(keys[0])
                !m.has(keys[0]) && m.set(keys[0], new Map());
                let curM = m.get(keys[0]);
                !curM.has(keys[1]) && curM.set(keys[1], new Map());
                Console.log(curM.get(keys[2]))
                if(!curM.has(keys[2])){
                        curM.set(keys[2], [curM.size + 1, keys[2], v[26], v[31]]);
                } else {
                        Console.log("走到这里来")
                        [v[26], v[31]].forEach((n, i) => curM.get(keys[2])[i+2] += n);
                }
        });

代码问题 如何判断时间？

gojswung

ctp_119 发表于 2022-9-20 07:39
肯定能做！！！只是愿不愿意的问题！！！时间问题

大神帮帮忙，让我学习下

冰封气流

很有挑战性啊，适合入门选手练手~我来试试，不过有点慢

gojswung

冰封气流 发表于 2022-9-20 22:38
很有挑战性啊，适合入门选手练手~我来试试，不过有点慢

谢谢啊 ，非常感谢

gojswung

function 一键生成(){
        let arr=Sheets.Item("report").Range("a1").CurrentRegion.Value2.slice(1);
        let obj={};
        arr.forEach(x=>{
                let key=(x[5]=="加盟"?"加盟":"直营联营") + "%" + x[16]+"%" + x[14]+ "%" +x[7];
                let temparr=obj[key] || [["序号","商品代码","SKU","今日销售","金额","单价","净销售数量","结算金额","累销售量","累销售量金额","累销单价","订单","批发","售馨率"]];
                let tempar=temparr.find(y=>y[1]==x[17]);
                if (tempar!=null){
                        tempar[2]+=x[24];                                        //销售数量
                        tempar[3]+=x[31];                                        //结算金额
                        tempar[4]=Math.round(tempar[3]/tempar[2],0);                //单价
                }else{
                        temparr.push([temparr.length,x[17],x[18],,,,x[24],x[31],x[31]/x[24]]);
                }
                obj[key]=temparr;
        });
        Sheets.Item("销售统计").Activate();
        Cells.ClearContents();
        let k=-1;
        for (let key in obj){
                let temparr11=obj[key];
                var arr4=key.split("%");//指定分隔符拆分一维数组
                Console.log(arr4[0])
                Console.log(arr4[1])
                Console.log(arr4[2])
                Console.log(arr4[3])
                if(arr4[2]=="春季"&& arr4[0]=="直营联营"&&arr4[3]=="2022"&& arr4[1]=="女鞋"){
                                Range("b1:e1").Offset(0,++k*(temparr11[0].length+1)).Value2=key.split("%");
                Range("a4").Offset(0,k*(temparr11[0].length+1)).Resize(temparr11.length,temparr11[0].length).Value2=temparr11;
                }
       
        }
}
搞了个半成品

gojswung

自己搞了一下，麻烦大神看一下

1. function 一键生成(){
   
2.         let arr=Sheets.Item("report").Range("a1").CurrentRegion.Value2.slice(1);
   
3.         let obj={};
   
4. 
   
5.        
   
6.         var x=new Date((new Date().getTime() - 1));
   
7.         timi1=WorksheetFunction.Text(x,"YYYY-MM-DD").toString()
   
8. 
   
9.         arr.forEach(x=>{
   
10.                 var timi=WorksheetFunction.Text(x[8],"YYYY-MM-DD").toString()
    
11.                 var keye = timi==timi1 ?true:false;
    
12.                
    
13.                 let key=(x[5]=="加盟"?"加盟":"直营联营") + "%" + x[16]+"%" + x[14]+ "%" +x[7];
    
14.                 let temparr=obj[key] || [["序号","商品代码","SKU","今日销售","金额","单价","净销售数量","结算金额","累销售量","累销售量金额","累销单价","订单","批发","售馨率"]];
    
15.                 let tempar=temparr.find(y=>y[1]==x[17]);
    
16.                 if (tempar!=null){
    
17.                         if(keye){
    
18.                                 tempar[3]+=x[26];        //6                                //销售数量
    
19.                                 tempar[4]+=x[31];        //7                        //结算金额
    
20.                                 tempar[5]=Math.round(tempar[4]/tempar[3],0);                //单价       
    
21.                                 tempar[8]=Math.round(tempar[3]+tempar[6],0);       
    
22.                                 tempar[9]=Math.round(tempar[4]+tempar[7],0);
    
23.                                 tempar[10]=Math.round(tempar[9]/tempar[8],0);
    
24.                        
    
25.                         }else{
    
26.                                 tempar[6]+=x[26];        //6                                //销售数量
    
27.                                 tempar[7]+=x[31];        //7                        //结算金额
    
28.                         //        tempar[4]=Math.round(tempar[7]/tempar[6],0);                //单价
    
29.                
    
30.                         }
    
31.                
    
32.                 }else{
    
33.                         if(keye){
    
34.                                 temparr.push([temparr.length,x[17],x[18],x[26],x[31],0,0,0,,]);
    
35.                         }else{
    
36.                                 temparr.push([temparr.length,x[17],x[18],0,0,0,x[26],x[31],x[26]+x[26],x[31]+x[31],((x[31]+x[31])/(x[26]+x[26]))]);
    
37.                         }
    
38.                        
    
39.                 }
    
40.                 obj[key]=temparr;
    
41.         });
    
42.         Sheets.Item("销售统计").Activate();
    
43.         Cells.ClearContents();
    
44.         let k=-1;
    
45.         for (let key in obj){
    
46.                 let temparr11=obj[key];
    
47.                 var arr4=key.split("%");//指定分隔符拆分一维数组
    
48.                 Console.log(arr4[0])
    
49.                 Console.log(arr4[1])
    
50.                 Console.log(arr4[2])
    
51.                 Console.log(arr4[3])
    
52.                 if(arr4[2]=="春季"&& arr4[0]=="直营联营"&&arr4[3]=="2022"&& arr4[1]=="女鞋"){
    
53.                                 Range("b1:e1").Offset(0,++k*(temparr11[0].length+1)).Value2=key.split("%");
    
54.                 Range("a4").Offset(0,k*(temparr11[0].length+1)).Resize(temparr11.length,temparr11[0].length).Value2=temparr11;
    
55.                 }
    
56.        
    
57.         }
    
58. }

复制代码

Again123456

先根据自己不会的部分，简化问题。

zhangmi

这个题你用vba能做吗？