"Typen unverträglich" bei Übergabe Array an Funkt.
03.01.2016 17:45:40
Kay
ich quäle mich seit über einer Stunde mit folgendem Problem herum, ohne dass mir ein Licht aufgehen würde. Es ist vermutlich ganz einfach, aber ich komme einfach nicht vom Fleck:
Wenn ich aus Routine1 heraus Routine2 aufrufe und an diese das Array Feld übergebe, erhalte ich "Typen unverträglich".
Ich verstehe nicht, warum, denn: Feld ist in Routine1 als String definiert, und der Parameter in Routine2 ist ebenfalls als String definiert.
ByVal habe ich übrigens nur verwendet, weil es mit ByRef nicht ging ("Argumenttyp ByRef unverträglich").
Vielleicht hat von Euch jemand eine Idee, hier der Code:
(Danke schon mal im Voraus!)
Public Sub Routine1()
Dim Feld(2) As String
Feld(1) = "hallo"
Feld(2) = "Welt"
Feld = Routine2(Feld)
End Sub
Public Function Routine2(ByVal Feld As String) As String
Feld(1) = Feld(1) & "x"
Feld(2) = Feld(2) & "y"
Routine2 = Feld
End Function