VBAで配列が空かどうかを判断する方法

1年 ago
光, 明
1 minute

VBAでは、配列が空かどうかを判定するためにIsArrayEmpty関数が使用できます。以下にコードの例を示します。

Sub CheckArrayIsEmpty()
Dim arr() As Variant
' 初始化数组
ReDim arr(1 To 5)
' 判断数组是否为空
If IsArrayEmpty(arr) Then
MsgBox "数组为空"
Else
MsgBox "数组不为空"
End If
End Sub
Function IsArrayEmpty(arr As Variant) As Boolean
IsArrayEmpty = IsEmpty(arr) Or UBound(arr) < LBound(arr)
End Function

このサンプルコードでは、最初に配列arrを宣言してから、ReDimステートメントを使って配列を初期化しています。その後、IsArrayEmpty関数を呼び出して配列が空かどうかを判定します。IsArrayEmpty関数はIsEmpty関数とUBound関数を使用して配列が空かどうかを判定します。配列が空の場合、または配列の上限インデックスが下限インデックスより小さい場合、配列は空と判定されます。

bannerAds