如何查找同类别中最近的行用于计算

zoomafia

例题描述

有库存物流Excel文件book1.xlsx，如下图所示：

现在需要计算Cost for Sales列的值，计算规则：如果Action为Bought时不用计算，为Sold时，则查找最近的一次Action为Bought的同种Stock，用它的Dynamic Cost乘以当前行的Shares算出。

实现步骤

1、 运行集算器

2、 编写脚本：

把代码列出来看得清楚点：

	A
1	=clipboard().import@t()
2	=A1.run(if(Action=="Sold",(k=~[:-1].pselect@z(Stock==A1.Stock && Action=="Bought"),'Cost for Sales'=A1(k).'Dynamic Cost'*Shares)))
3	=clipboard(A2.field("Cost for Sales").export())

A1 从剪贴板里读取数据，选项@t表示首行是列标题

A2 循环A1的每一行，计算：如果当前行的Action是Sold，则从它之前的行中往前查找与当前行同类的Stock且Action=Boughtr行号赋给变量k，令当前行的Cost for Sales的值为第k行的Dynamic Cost乘以当前行的Shares。其中~[:-1]表示A1中第1行到当前数的上一行。

A3 将A2中Cost for Sales的列值转换成字符串放进剪贴板中

3、 代码写好以后，到Excel文件里选择数据区A1:F7，然后按Ctrl+C复制到剪贴板。

回到集算器，按F9运行程序，运行结束后再回到Excel文件，点击F2，按Ctrl+V就可以把计算结果粘贴过来。