创建求当前间隔的自定义函数

WYS67 · 发表于 2018-9-20 20:11

lss001 发表于 2018-9-20 19:46

老师：经测试，结果正确，还有需要修改之处：1.E32的67是误输入的，数据当前序号必须以K1指定的数据为原点。2.第三参数“1”只能用于当前序号间隔，没有第三参数的才是当前行号间隔。

WYS67 · 发表于 2018-9-20 20:38

本帖最后由 WYS67 于 2018-9-20 21:23 编辑

lss001 发表于 2018-9-20 19:46
DQYL代码优化！！！

Function DQYL(qu As Range, tq As Range, Optional tj = "") '单值

老师：经别人参考：把问题简单化如下： 1. 当前行号间隔的公式为： I列无数据的第一个行号数【本例中是I32】减去指定数据最后一次出现的行号数；公式输入格式为：=DQYL(I5:I100000,指定数据) 【即：公式里 没有第三参数，就是求当前行号间隔；增加第三参数，就是求当前序号间隔】

2.当前序号间隔的公式为：用 K1指定的数值，减去指定数据最后一次在I列出现时，对应于E列的序号数；公式输入格式为：=DQYL(I5:I100000,指定数据,$K$1)

以上面的叙述编写代码，更简单明了，快捷方便！

麻烦老师按这个运算规则编写代码。

lss001 · 发表于 2018-9-20 21:04

本帖最后由 lss001 于 2018-9-20 21:37 编辑

楼上代码已修正！！！
请自行复制！！！

WYS67 · 发表于 2018-9-20 21:37

本帖最后由 WYS67 于 2018-9-20 21:40 编辑

lss001 发表于 2018-9-20 21:04
楼上代码已修正！！！

非常感谢老师的热心帮忙！代码几近完美！如果能趁热打铁，不再用第三参数0或1，直接按12楼的最简要求：

求当前行号间隔，输入公式 =DQYL(数据区域,指定数据) ；求当前序号间隔，则输入公式 =DQYL(数据区域,指定数据，指定当前序号K1)
就能显示计算结果，那就更加白玉无瑕了！

【即：公式里不用第三参数，就是求当前行号间隔；用了第三参数，就是求当前序号间隔】

lss001 · 发表于 2018-9-20 21:45

WYS67 发表于 2018-9-20 21:37
非常感谢老师的热心帮忙！代码几近完美！如果能趁热打铁，不再用第三参数0或1，直接按12楼的最简要求：
...

请上传附件！！！
举例说明问题以便于有针对性的处理！！！

WYS67 · 发表于 2018-9-20 21:55

本帖最后由 WYS67 于 2018-9-20 21:59 编辑

lss001 发表于 2018-9-20 21:45
请上传附件！！！
举例说明问题以便于有针对性的处理！！！

创建求指定数据当前间隔的自定义函数.zip (11.66 KB, 下载次数: 4) 老师:还是1楼那个附件，打开后，对照14楼的要求，您会发现是一样的。

只需把您写的原代码按14楼要求调整一下就可以了！

lss001 · 发表于 2018-9-20 22:27

WYS67 发表于 2018-9-20 21:55
老师:还是1楼那个附件，打开后，对照14楼的要求，您会发现是一样的。

只需把您写的原代码按14楼要 ...

10楼代码再次修正！
请自行复制粘贴！！！

WYS67 · 发表于 2018-9-20 22:31

lss001 发表于 2018-9-20 21:45
请上传附件！！！
举例说明问题以便于有针对性的处理！！！

老师：E列的序号在《总表》原本是连续的。但I列的数据源是0~9里筛选出>=5的数字，所以E列的序号看起来不连续。K1指定为67，而最后数据I31对应的E31是序号64，说明序号65、66是被<5的其它数据占用了。

lss001 · 发表于 2018-9-20 22:36

本帖最后由 lss001 于 2018-9-20 22:40 编辑

WYS67 发表于 2018-9-20 22:31
老师：E列的序号在《总表》原本是连续的。但I列的数据源是0~9里筛选出>=5的数字，所以E列的序号看起来不 ...

附件应该发原数据为妥
处理数据才比较准确！！！

创建求指定数据当前间隔的自定义函数.zip (19.76 KB, 下载次数: 10)

WYS67 · 发表于 2018-9-20 22:44

本帖最后由 WYS67 于 2018-9-20 22:47 编辑

lss001 发表于 2018-9-20 22:36
附件应该发原数据为妥
处理数据才比较准确！！！

老师：K27:L31是用函数公式计算的正确的模拟结果。10楼新修改的代码计算结果和K27:L31对应不上。
您原先代码的计算结果都正确。需要修改的是输入格式而已，

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

[求助] 创建求当前间隔的自定义函数

评分