Wie öffne ich mit Access und VBA eine CSV-Datei ohne Zeilenumbruch?

Um eine CSV-Datei in Access mit VBA zu öffnen, ohne dass Zeilenumbrüche berücksichtigt werden, kannst du die Datei als Textdate einlesen und die Daten dann in eine Tabelle importieren. Hier ist ein Beispiel, wie du das machen kannst:

1. **Öffne die CSV-Datei als Textdatei.**
2. **Lese den Inhalt der Datei in eine Variable.**
3. **Verarbeite den Inhalt, um die Zeilenumbrüche zu ignorieren.**
4. **Importiere die Daten in eine Access-Tabelle.**

Hier ist ein Beispielcode:

```vba
Sub ImportCSVWithoutLineBreaks()
Dim filePath As String
Dim fileContent As String
Dim fileNumber As Integer
Dim dataArray() As String
Dim i As Integer

' Pfad zur CSV-Datei
filePath = "C:\Pfad\zu\deiner\datei.csv"

' Datei öffnen
fileNumber = FreeFile
Open filePath For Input As #fileNumber

' Inhalt der Datei lesen
fileContent = Input$(LOF(fileNumber), fileNumber)

' Datei schließen
Close #fileNumber

' Zeilenumbrüche entfernen (optional, je nach Bedarf)
fileContent = Replace(fileContent, vbCrLf, "")

' Daten in ein Array aufteilen (z.B. durch Komma)
dataArray = Split(fileContent, ",")

' Daten in die Access-Tabelle importieren
For i = LBound(dataArray) To UBound(dataArray)
' Hier kannst du den Code zum Einfügen in die Tabelle hinzufügen
' Beispiel: CurrentDb.Execute "INSERT INTO DeineTabelle (DeineSpalte) VALUES ('" & dataArray(i) & "')"
Next i
End Sub
```

Stelle sicher, dass du den Pfad zur CSV-Datei und die Tabelle sowie die Spaltennamen entsprechend anpasst. Dieser Code liest die gesamte Datei in einen String, entfernt Zeilenumbrüche und teilt den Inhalt in ein Array, das du dann in deine Access-Datenbank importieren kannst.