1.8k Aufrufe
Gefragt in Datenbanken von
Hallo,
ich habe eine CSV-Datei und möchte diese mittels VBA in Access einlesen.
Das Problem ist, dass 2 Zeilen in einen 1 Datensatz gehören.
Die einzelnen Kriterien kann ich auslesen nur hab ich dann dann 2 Datensätze.

Hier mal der Code, den ich erstellt habe:

While Not EOF(1) 'Wenn du nicht am Ende EOF von den Zeilen im 1 File (1) bist,
Line Input #1, strZeile 'lese die Zeile unter der Variable Zeile ein

'Zeile 1 auslesen
If IsNumeric(Trim(Left(strZeile, 5))) Then
intSort_BG = (Trim(Left(strZeile, 5)))
End If

'Zeile 2 auslesen
If Left(strZeile, 8) = "Card" Then
strKartenmodell = Left(strZeile, 8)
End If

'Zeile 2 auslesen mit anderem Text
If Left(strZeile, 8) = "Kunden" Then
strKartenmodell = Left(strZeile, 8)
End If

Wend 'Wiederholen

Close #1


Kann mir jemand weiterhelfen?

Vielen Dank und Grüße
Anne

2 Antworten

0 Punkte
Beantwortet von rahi Experte (1.5k Punkte)
Hallo Anne,

poste mal ein paar Zeilen deiner CSV_Datei, sonst ist es recht schwierig dein Anliegen zu verstehen. Im Übrigen funktioniert das Lesen der zweiten Zeile nach deinem Code nicht wirklich sinnvoll. Vielleicht schreibst du auch noch ein paar Worte zur Interpretation der Daten.

Gruß
Ralf
0 Punkte
Beantwortet von
Hallo Ralf,
vielen Dank, dass Du Dich um meine Frage gekümmert hast!!!

Ich habe die Lösung selbst gefunden ;-)) Ich hatte einen Denkfehler ...

Grüße
Anne
...