通过字典查找倒数第三、倒数第二、倒数第一的数值。

马小呆 · 发表于 2023-4-6 21:42

具体需求，请看附件，谢谢

zjzyj · 发表于 2023-4-6 23:30

附件供参考

马小呆 · 发表于 2023-4-7 09:04

zjzyj 发表于 2023-4-6 23:30
附件供参考

复制代码

请问一下，这几句是什么意思，有点看不懂啊。

         k = D(brr(i, 7)).keys()(0)
         D(brr(i, 7)).Remove k

         D(brr(i, 7))(i) = ""

         X = D(k).keys()(i)

马小呆 · 发表于 2023-4-7 09:22

zjzyj 发表于 2023-4-6 23:30
附件供参考

有点小问题，还请再看一下附件，有劳！

grf1973 · 发表于 2023-4-7 11:12

在2楼的基础上改了一下。源数据是按日期顺序的，找最后三次只要倒序查找即可。

grf1973 · 发表于 2023-4-7 11:17

if brr(i,5)<=至 then 可以加点判断，改为：
if brr(i,5)<=至 and arr(m,5)="" then

这样一行查找满3个数就不去执行其他语句了，数量大的话可以提高效率。

grf1973 · 发表于 2023-4-7 11:22

因为是按日期倒序查找的，所以名称也是倒序的。如果要改，可以输出后按序号倒序排列，再把序号重编即可。

马小呆 · 发表于 2023-4-7 11:55

grf1973 发表于 2023-4-7 11:17
if brr(i,5)

感谢帮助！

请帮忙再修改一下，不是从参数表里，筛选所有的【材料名称】。

而是在（查询表）里的 E列，我是手工输入的名称，（也就是提前指定了名称）

然后在参数表找出最后一次（产地、单位、联系人、电话）

然后在参数表里找（倒数第三、倒数第二、倒数第一）的数值

1、如果输入了日期范围，就按日期范围找。

2、如果没有输入日期范围，那就从下到上整个参数表里找。

有劳了，老师！

grf1973 · 发表于 2023-4-7 13:50

没有日期范围，就直接指定最大日期为当前日期，效果一样的。

grf1973 · 发表于 2023-4-7 13:52

另外，按照你的要求，在日期区间内找不到要向前找，因此起始日期是没有意义的，只要判断实际日期比终止日期小即可。

		自动登录	找回密码
密码			免费注册

[求助] 通过字典查找倒数第三、倒数第二、倒数第一的数值。