in Funktion Array übergeben
10.10.2005 15:58:23
Marco
ich möchte einer Funktion einen Array übergeben, leider funktioniert das nicht. Ich habe folgendes gemacht:
Private Function ArrayErstellen(ByRef arrZellenzuordnung() As String) As String
arrZellenzuordnung(1, 1) = "Hallo11"
arrZellenzuordnung(1, 2) = "Hallo12"
arrZellenzuordnung(2, 1) = "Hallo21"
arrZellenzuordnung(2, 2) = "Hallo22"
arrZellenzuordnung(3, 1) = "Hallo31"
arrZellenzuordnung(3, 2) = "Hallo32"
arrZellenzuordnung(4, 1) = "Hallo41"
arrZellenzuordnung(2, 1) = "Hallo42"
ArrayErstellen = arrZellenzuordnung
End Function
Der Aufruf lautet folgendermaßen:
Dim arrZellenzuordnung(1 To 99, 1 To 99) As String
arrZellenzuordnung() = ArrayErstellen(arrZellenzuordnung)
Was mache ich falsch? Vielen Dank für eure Hilfe!
Gruß, Marco