补上同一类数据的数量

zoomafia

例题描述

有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