19.07.2019, 16:10
Hallo,
ich gehe mal davon aus, dass es sich in der "echten" Datei um mehr als eine Zeile handelt. Dann würde ich die Daten aus dem "Zeilen-Array" nicht in ein zweites Zeilen-Array schreiben, sondern in ein Array mit allen Zeilen und dieses dann in die Tabelle einfügen. Zudem würde ich Zahlen mit Dezimalkomma anders umwandeln, sonst kommt eventuell mist dabei raus. Z. B. so:
Aber Achtung, wenn Tausender-Trennzeichen vorkommen, müssen diese auch ersetzt werden.
ich gehe mal davon aus, dass es sich in der "echten" Datei um mehr als eine Zeile handelt. Dann würde ich die Daten aus dem "Zeilen-Array" nicht in ein zweites Zeilen-Array schreiben, sondern in ein Array mit allen Zeilen und dieses dann in die Tabelle einfügen. Zudem würde ich Zahlen mit Dezimalkomma anders umwandeln, sonst kommt eventuell mist dabei raus. Z. B. so:
Code:
For n = 0 To UBound(a)
If IsNumeric(a(n)) Then
If InStr(a(n), ".") > 0 Then
b(i, n) = CDbl(Replace(a(n), ".", ","))
Else
b(i, n) = CLng(a(n))
End If
Else
b(i, n) = a(n)
End If
Next