Hallo zusammen,
ich stehe vor einem mir, momentan, unlösbaren Problem. Google hat mir bisher auch nicht weiterhelfen können.
Ich habe eine Userform mit einer TextBox, in der Eingaben gemacht werden (Barcodes scannen). Nun werden die einzelnen Eingaben per Split-Funktion getrennt und in einer Spalte C eines Worksheets ausgegeben.
Jetzt soll aber noch ein anderer Barcode hinzukommen, der weniger Zeichen enthält und in eine andere Spalte eingetragen werden soll.
Der eine hat 13, der andere 11 Zeichen.
Mein Problem ist nun, dass ich die Zeichenlänge der einzelnen Array-Zeilen auslesen muss und das über meine Kenntnisse hinausgeht.
Ich wäre daher über jede Hilfe erfreut.
Der momentane Code - ohne Unterteilung - sieht folgendermaßen aus:

If Trim$(EAN) "" Then
vntSplit = Split(EAN, vbCrLf)
For i = 0 To UBound(vntSplit)
Cells(emptyRow, 3).Offset(i, 0) = "'" & Trim$(vntSplit(i))
Next i
End If

Danke
Christian