补上同一类数据的数量

 

例题描述

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   再对A1EmployeeShift分组

A4   A3中的各组分别new出一条新记录,取出EmployeeShift字段,将组内各记录的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