自定义函数怎样才能嵌套excel内置函数

WYS67 · 发表于 2018-8-29 23:08

本帖最后由 WYS67 于 2018-8-30 07:11 编辑

有老师帮忙写了个--求相同数据上下次之间隔了多少个其它不重复数据的自定义函数JIANGE，区域数组公式=JIANGE(A5:A49)在B列列能够得出正确答案。现在需要求出A5:A49十位上数字的间隔，可是在C5:C49输入区域数组公式=JIANGE(LEFT(A5:A49,1))，却显示了#VALUE!错误！是什么原因造成的？怎样才能得出正确的结果？还有，我还需要求出A5:A49个位上数字的间隔，在D5:D49输入区域数组公式=JIANGE(RIGHT(A5:A49,1))，仍然显示#VALUE!错误！应该怎样解决？

自定义函数如何嵌套内置函数？.zip (8.03 KB, 下载次数: 22)

WYS67 · 发表于 2018-8-30 08:29

恳请老师们帮忙解决！

小fisher · 发表于 2018-8-30 08:34

你的函数定义是：Function JIANGE(Rng As Range, Optional c As Byte) As Variant()而当使用=JIANGE(LEFT(A5:A49,1))时，JIANGE函数获得的第一个参数是Variant()数组，会出现“ByRef参数类型不符”的错误。
把函数定义中的Rng as Range改成Rng就可以了

WYS67 · 发表于 2018-8-30 09:17

小fisher 发表于 2018-8-30 08:34
你的函数定义是：Function JIANGE(Rng As Range, Optional c As Byte) As Variant()而当使用=JIANGE(LEFT(A ...

老师：我还有两点困惑，需要请教：
1.是不是把函数定义中的Rng as Range改成Rng后，就可以嵌套大多数excel内置函数了？ 2.把Rng as Range改成Rng后，对原来功能有没有影响？我现有的自定义函数库中有定义为rgSource As Range ，rng As Range ，xA As Range ，Rng As Range ，sjy As Range ，rgSourceArea As Range ......等等.但以rng As Range居多。是不是修改成Rng后，就都可以嵌套excel内置函数了？

DDBB2008 · 发表于 2018-9-18 15:35

厉害了。。。。。。

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

[求助] 自定义函数怎样才能嵌套excel内置函数

评分