Arrays an API-Funktionen übergeben

Vielleicht setzen Sie eine eigene VBA-Funktion ein, die ein Array von Elementen als Parameter erwartet. Arrays können Sie auch an API-Funktionen übergeben, indem Sie das erste Element als ByRef-Parameter übergeben.

Hiervon ausgenommen sind lediglich Zeichenketten-Arrays, da die einzelnen String-Elemente unterschiedliche Längen aufweisen. 

Die folgende Funktion fnMwstBerechnen erwartet ein Array von Integer-Werten und berechnet die Mehrwertsteuer für jedes Element der Liste: 

Declare Function fnMwstBerechnen Lib "Finanz.dll" _
        (ByRef intListe As Integer, _
        intElemente As Integer) As Long 

Public Function fnMwstFürListe() 

Dim ret As Long, aryListe(10) As Integer, i As Integer 

    For i = 1 To 10 ' Array mit Beispieldaten auffüllen 
        aryListe(i) = i * 4 
    Next if 

    ' Referenz des ersten Elements übergeben 
    ret = fnMwstBerechnen(aryListe(1), 10) 

End Function