IsEmptyArray: Unterschied zwischen den Versionen

Aus Thomas Wiki
Zur Navigation springen Zur Suche springen
(Die Seite wurde neu angelegt: „== Leere Arrays == Leider gibt es keine eingebaute Funktion in Visual Basic for Applications um zu prüfen, ob ein Array im VBA leer ist. Folgende Fun…“)
 
 
(Eine dazwischenliegende Version desselben Benutzers wird nicht angezeigt)
Zeile 1: Zeile 1:
== Leere Arrays ==
Leider gibt es keine eingebaute Funktion in [[VBA|Visual Basic for Applications]] um zu prüfen, ob ein Array im VBA leer ist. Folgende Funktion hilft hier:
Leider gibt es keine eingebaute Funktion in [[VBA|Visual Basic for Applications]] um zu prüfen, ob ein Array im VBA leer ist. Folgende Funktion hilft hier:


== Funktion IsArrayEmpty ==
<pre>
<pre>
Public Function IsEmptyArray(arr As Variant) As Boolean
Public Function IsEmptyArray(arr As Variant) As Boolean
  Dim lb As Long
    
    
   On Error GoTo handler
   On Error GoTo handler
 
    lb = LBound(arr)
  Dim lb As Long
  On Error Goto 0
 
 
  lb = LBound(arr)
   IsEmptyArray = False
   IsEmptyArray = False
   Exit Function
   Exit Function

Aktuelle Version vom 19. Dezember 2018, 11:37 Uhr

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