如果值为null,则使用默认值

时间:2015-10-12 21:02:39

标签: vba

在编写自己的函数之前,VBA中是否有内置函数,如果变量/函数返回值为null,我可以指定默认值?我知道写出if条件语句,但这有点冗长。在其他语言中,我可以使用三元条件语句,或者(我认为在Excel中)使用函数来指定默认值。

e.g。

Dim v as integer
v = DefaultValue(SomeFunction(), 5) ' put 5 in v if SomeFunction returns null

1 个答案:

答案 0 :(得分:3)

这是我写的自己的功能:

Public Function DefaultValueIfNull(unknown As Variant, optional defaultValue As Variant) As Variant
    If IsNull(unknown) Then
        DefaultValueIfNull = defaultValue
    Else
        DefaultValueIfNull = unknown
    End If
End Function

这似乎与Access

中的内置函数Nz(value, valueIfNull)完全相同