Attribute VB_Name = "Utils"
Option Explicit

Public Function IsEmptyArray(arr() As String) As Boolean
    On Error Resume Next
    Dim i As Integer
    i = UBound(arr)
    If Err.Number <> 0 Or i < 0 Then
        IsEmptyArray = True
        Err.Clear
    Else
        IsEmptyArray = False
    End If
End Function