IsEmptyArray

Aus Thomas Wiki
Zur Navigation springen Zur Suche springen

Leider gibt es keine eingebaute Funktion in Visual Basic for Applications um zu prüfen, ob ein Array im VBA leer ist. Folgende Funktion hilft hier:

Funktion IsArrayEmpty

Public Function IsEmptyArray(arr As Variant) As Boolean

  Dim lb As Long
  
  On Error GoTo handler
    lb = LBound(arr)
  On Error Goto 0

  IsEmptyArray = False
  Exit Function
    
handler:
  IsEmptyArray = True
  
End Function