gpt4 book ai didi

excel - Excel 中用户定义的 IFS 函数的 VBA 代码

转载 作者:行者123 更新时间:2023-12-04 22:26:28 26 4
gpt4 key购买 nike

我们公司使用的是 Excel 2016 的打包版本,而不是 Office 365 版本。我最近了解到新版本中存在 IFS 功能,它似乎非常有用。我在网站上以 VBA 形式找到了 CONCATENATEIF 函数,我想知道是否有办法在我的旧版本中以同样的方式复制这个公式。我在 VBA 编码方面不是很有经验,所以我很感激帮助!

最佳答案

下面复现IFS()的功能, 使用 ParamArray处理任意数量的参数:

Public Function UdfIfs(ParamArray args() As Variant) As Variant
Dim i As Integer
i = 0 ' or 1 if you're not using zero-based indexing
Do Until CBool(args(i)) Or (i >= UBound(args))
i = i + 2
Loop
If i < UBound(args) Then
UdfIfs = args(i + 1)
End If
End Function

关于excel - Excel 中用户定义的 IFS 函数的 VBA 代码,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/57462892/

26 4 0
Copyright 2021 - 2024 cfsdn All Rights Reserved 蜀ICP备2022000587号
广告合作:1813099741@qq.com 6ren.com