补上同一类数据的数量
例题描述
有Excel文件book1.xlsx中有下图所示数据,Employee是员工名字,Shift是上下班标记,Route ID是员工坐的班车号。
现在要统计出员工每天上下班时同班车的人数。结果如下图绿色区所示:
此题涉及分组后对组汇总、组内记录的再运算以及剪贴板使用。
实现步骤
1、 编写脚本:
A |
|
1 |
=clipboard().import@t().derive(Employees) |
2 |
=A1.group('Route ID').run(a=~.count(),~.run(Employees=a)) |
3 |
=A1.group(Employee,Shift) |
4 |
=A3.new(Employee,Shift,"{"/~.(Employees).concat(";")/"}":Clubbing) |
5 |
=clipboard(A4.export@t()) |
A1 从剪贴板里读取数据并增加一列Employees,选项@t表示首行是列标题
A2 按Route ID分组后,循环各组,计算各组记录数(即同车人数)赋给变量a,再循环组内各记录令Employees=a
A3 再对A1按Employee和Shift分组
A4 用A3中的各组分别new出一条新记录,取出Employee、Shift字段,将组内各记录的Employees用分号连接成串,两边再加上大括号,命名为Clubbing字段。
A5 把A4中的序表转换成字符串后放进剪贴板,选项@t表示转换时要输出列标题
2、 到Excel文件里选择数据A1:D18,然后按Ctrl+C复制到剪贴板。
回到集算器,运行程序,结束后再回到Excel文件,点击G1,按Ctrl+V就可以把计算结果粘贴过来。
问答搜集 https://stackoverflow.com/questions/63800133/multi-criteria-search-and-returning-multiple-values-from-a-table-using-array-fun
【附件】 clubbing.zip
英文版
英文已更新