folgender Code schreibt aus einer Textbox Zahlen, die mit Leerzeichen getrennt sind in ein Array welches As Variant deklariert ist.
Nun wird aus diesem Array jede Zahl entnommen und es wird ein Code ausgeführt welcher am Ende die Zahl entweder ein ErrorArray (Variant) oder ein NoArray (Variant) einträgt.
Folgender Code, mit dem ich das Array danach in einer Messagebox ausgeben will funktioniert aber nicht, bzw Läuft immer auf Fehler:
Dim txt As String
Dim a As Long
For a = LBound(noErrorArray) To UBound(noErrorArray)
txt = txt & CStr(noErrorArray(a)) & Chr(13)
Next a
Hat jemand eine Idee woran das legen kann?
Gruß Domi