自定义函数如何返回多个值，并赋值给excel表

kof369 · 发表于 2014-5-27 08:57

zhaogang1960 发表于 2014-5-15 22:58
既然你要求使用函数解决数组问题，就应该接受这种方法，否则只能使用Sub过程解决了

老师的录像是怎么做的？

zhaogang1960 · 发表于 2014-5-27 10:22

kof369 发表于 2014-5-27 08:57
老师的录像是怎么做的？

请搜索一个叫做“ggg”的软件

kof369 · 发表于 2014-5-28 21:20

zhaogang1960 发表于 2014-5-16 13:47

老师，如何实现视频中根据token参数的选择来具体返回函数计算值呢，例如只选择add则返回a+b，如果选择add，dec则返回，a+b，a-b呢？d:kkkkkkkkkkkkkkkkkkkkk

kof369 · 发表于 2014-5-28 21:40

zhaogang1960 发表于 2014-5-16 13:47

fun.rar (1.7 MB, 下载次数: 9)

老师，如何实现视频中根据token参数的选择来具体返回函数计算值呢，例如只选择add则返回a+b，如果选择add，dec则返回，a+b，a-b呢？file:///d:kkkkkkkkkkkkkkkkkkkkk

kof369 · 发表于 2014-5-30 17:51

D://bb.gif

请问老师如何实现附件中根据token参数的选择而确定返回值的个数，就以上面的函数为例子吧，如果返回参数只有add，则只返回一个返回值；如果要求返回add和dec，则返回加和减两个返回值。

frefs · 发表于 2014-5-30 22:21

Public Function cal(a As Integer, b As Integer) As Variant
Dim c(1 To 2) As Integer
c(1) = a + b
c(2) = a - b
cal = c
End Function

kof369 · 发表于 2014-5-31 08:41

frefs 发表于 2014-5-30 22:21
Public Function cal(a As Integer, b As Integer) As Variant
Dim c(1 To 2) As Integer
c(1) = ...

这个函数不行，录像上面说明了，想要的结果是可以变的，可以一个，可以两个，也可以中间挑几个，以上的函数好像不能实现，返回就是数组的全部，而不是根据需要的部分数组

kof369 · 发表于 2014-5-31 12:43

zhaogang1960 发表于 2014-5-27 10:22
请搜索一个叫做“ggg”的软件

请赵老师解答下下面提的问题吧。

shawemou · 发表于 2018-4-17 18:40

chxw68 发表于 2014-5-15 18:26
这个就是数组公式了，在需要计算的地方选择两个连续的单元格，输入公式，然后按Ctrl+Shit+Enter。

您好，如果我不知道返回值的个数，该怎么做呢

yaogunyejimo · 发表于 2023-7-24 20:18

给个建议，可以给函数增加一个参数，用这个参数来决定你需要返回的是哪个值

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

[求助] 自定义函数如何返回多个值，并赋值给excel表