ich weis leider nicht wie ich mein Array auslese(folgendermaßen definiert):
For lZeile = 1 To UBound(arr) 'alle Zeilen
For lSpalte = 1 To UBound(arr, 2) 'alle Spalten
If arr(lZeile, lSpalte) = "x" Then
arraytxt(z, zz) = Cells(3, lSpalte + 1)
MsgBox arraytxt(z, zz)
z = z + 1
zz = zz + 1
End If
Next lSpalte
Next lZeile
Also wenn im Array ein x gefunden wurde dann soll er mir eine bestimmte Zelle ausgeben, das ist jedoch jetzt nicht so wichtig denke ich. Mein Problem:
Wie lese ich jetzt den Array (arraytxt) aus und schreibe die einzelnen Werte des Array nacheinander in eine Spalte?
Googel hat mir leider bisher nicht weitergeholfen, hoffe ich finde hier Hilfe!
Danek euch