函数识别早班，中班，晚班

lidedong82

数据大概每月3500-4000条，手动核实比较麻烦而且容易错和慢，有没办法自动识别，救助各位，具体内容看附件，谢谢各位！！

lidedong82

大家帮看看

sunya_0529

条件有点复杂，公式搞起来不方便，用WPS里的JSA帮你写了个宏，效果如下图所示——

lidedong82

sunya_0529 发表于 2024-2-3 18:05
条件有点复杂，公式搞起来不方便，用WPS里的JSA帮你写了个宏，效果如下图所示——

情况确实是很复杂，实际情况比这复杂的多，因为有些岗位因为实际需要，白班和晚班上班时间都有不同的调整，这个宏已经可以解决90%以上的问题了，还是要感谢你。

lidedong82

sunya_0529 发表于 2024-2-3 18:05
条件有点复杂，公式搞起来不方便，用WPS里的JSA帮你写了个宏，效果如下图所示——

你好最近我用这个识别班次，有错误跳出来，能帮解决一下么

lidedong82

lidedong82 发表于 2024-12-13 17:35
你好最近我用这个识别班次，有错误跳出来，能帮解决一下么

附件我上传了

sunya_0529

lidedong82 发表于 2024-12-13 17:58
附件我上传了

日期格式需要处理一下，同时考勤时间里有空记录，所以代码也要做一下容错处理。
不同班次的判断条件，可以根据实际情况，你自己调整一下。

1. function 识别班次() {
   
2.     const awf = Application.WorksheetFunction;
   
3.     const db = Range("A1").CurrentRegion.Columns("A:C")().slice(1);
   
4.     const res = [];
   
5.     const day = (d) => awf.Text(d, "dd");
   
6.     db.forEach((r, i) => {
   
7.         let arr = r[2]?.split(";").map(x => x.replace(/:/g, ""));
   
8.         let str = "";
   
9.         if (r[2]?.length) {
   
10.             arr.forEach(y => {
    
11.                 if (y <= 80000 && y > 70000) {
    
12.                     str += `+${day(r[0])}日早班上班卡`;
    
13.                 } else if (y <= 160000 && y > 150000) {
    
14.                     str += `+${day(r[0])}日中班上班卡`;
    
15.                 } else if (y <= 180000 && y > 160000) {
    
16.                     str += `+${day(r[0])}日早班下班卡`;
    
17.                 } else if (y <= 240000 && y > 230000) {
    
18.                     str += `+${day(r[0])}日晚班上班卡`;
    
19.                 } else if (y <= 10000 && y > 0) {
    
20.                     try {
    
21.                         if (db[i + 1][1] == r[1]) str += `+${day(db[i + 1][0])}日中班下班卡`;
    
22.                     } catch { }
    
23.                 } else if (y <= 90000 && y > 80000) {
    
24.                     try {
    
25.                         if (db[i + 1][1] == r[1]) str += `+${day(db[i + 1][0])}日晚班下班卡`;
    
26.                     } catch { }
    
27.                 } else {
    
28.                     str += `+[${awf.Text(y, "#:##:##")}]`;
    
29.                 }
    
30.             });
    
31.         }
    
32.         res.push([str.replace("+", "")]);
    
33.     });
    
34.     Range("D2").Resize(res.length, 1).Value2 = res;
    
35. }

复制代码