|
Hallo,
ich habe folgendes Problem und hoffe auf eure Hilfe:
Ich habe eine Funktion („Beispiel) geschrieben und diese soll nun Werte aus einem Array auslesen und zur Berechnung verwenden. Dies geschieht in einem Sub.
Function Beispiel (Parameter_1 as Double, Parameter_2 as Double, Parameter_3 as Double)
...
End Function
Nun habe ich in einem Sub einen Array definiert und möchte hier die Funktion "Beispiel" verwenden. Die Parameter_2 und Parameter_3 sind konstant. Den Parameter_1 möchte ich aus einer Array-Spalte auslesen
Sub Test()
Dim Arr(1 To 525601, 1 To 15) As Variant
For k = 0 To 364
For i = 1 To 1440
…
Arr(1, 9) = "Beschriftung"
Arr(i + k * 1440 + 1, 9) = … hier stehen die Werte, die ich auslesen möchte
Arr(1, 10) = "Beschriftung"
Arr(i + k * 1440 + 1, 10) = Beispiel(Arr(i + 1, 9), Parameter_2, Parameter_3)
...
End Sub()
Leider erhalte ich die folgende Fehlermeldung:
"Fehler beim Kompilieren:
Argumententyp ByRef unverträglich"
Ich habe versucht, das Problem per Google-Suche zu lösen, bisher ohne Erfolg.
Ich hoffe, Ihr könnt mir helfen!
Danke! ;)
|