Office: Fehlerhafter CSV Text-Import

Hallo Forum,
nach Umstellung der HomeBanking Software meiner Bank (Bank Austria) von XML auf CSV Export habe ich Probleme beim Einlesen der Buchungsdatei.
Ein Feld (Belegdaten) enthält mehrere Zeilen, die durch CR-LF getrennt sind, es ist auch korrekt in Hochkomma gesetzt.
Beim direkten Öffnen des CSV durch Doppelklick werden die Sätze korrekt eingelesen.
Beim Import der CSV Datei nach Excel 2010 Professional über den Text-Import Assistenten bewirken diese Recordseperatoren (CR-LF) innerhalb des mit Hochkomma separierten Feldes einen neuen Record. Innerhalb des Feldes gibt es keine weiteren Hochkomma.
(Beim Import ist als einziges Trennzeichen ; definiert und als Texterkennungszeichen " )
Ist das Problem bekannt?

Gekürztes Beispiel:

Buchungsdatum;Valutadatum;Buchungstext ;Interne Notiz;Währung;Betrag;Belegdaten;
30/11/2012;30/11/2012;FETTER 1160;;EUR;-48,91;"";
30/11/2012;30/11/2012;Gutschrift xyz;EUR;345,06;"
GUTSCHRIFT
Belegnr.: 12364 ";
29/11/2012;29/11/2012;Gutschrift abcd;;EUR;207,76;" GUTSCHRIFT
Belegnr.: 1234 ";
01/10/2012;30/09/2012;Habenzinsen;;EUR;1,12;"";

 

Hi,

ich kann das Problem jetzt nicht wirklich nachvollziehen. Ich habe Dein Beispiel mal in eine TXT Datei kopiert und dann in Excel importiert. Ohne Probleme, bis auf die Tatsache, dass im zweiten Datensatz nur 6 statt 7 Felder enthalten sind. Kannst Du mal eine gekürzte CSV Datei hochladen?

Viele Grüße
Michael

 

Hi Michael,

das war wirklich schnell - Danke!
Ich lade die CSV Datei (als .txt - als .csv wurde eine idente Kopie als fehlerhaft abgewiesen) und die zwei Ergebnisse in einem XLSX hoch.

lG
Josef

 

hallo Josef,

folgendes sollte helfen: öffne die Csv Datei, dort markierst du die Spalte mit den CLRFs und führst folgendes Makro aus:

Code:

Sub Makro1()
'
' Makro1 Makro
'
  Dim Bereich As Range

    Set Bereich = Selection
    With Bereich
.   .Replace What:=Chr(10), Replacement:="", LookAt:=xlPart, MatchCase:=True
    End With


'
End Sub

speichern und dann importieren. Bei mir hat es funktioniert.

Viele Grüße
Michael

 

Hallo Michael,

ich werde das bei Gelegenheit testen. Da ich regelmäßig monatlich die Kontobewegungen in die Buchhaltung per Datenverbindung einlese, müsste ich den ganzen Job durch ein Makro realisieren.

Ich habe übrigens im Hex Editor die LF (10., 0Ah) entfernt, was ja auch das Makro machen sollte. Es geht auch dann nicht korrekt (siehe GIRO_Test2.txt)

lG
Josef

 

Hallo Josef,

stimmt mit der Textdatei funktioniert es auch nicht. Mit der nach meinem Schema geht es aber ;-)
Was ist der ganze Job? Ist der automatisiert? Also Verbindung zur Bank, runterladen und gleich importieren?

Viele Grüße
Michael

 

Hallo Josef,

in der beiliegenden Excel-Datei habe ich Dir ein Makro eingebaut, das den Import der txt/csv-Datei in ein beliebiges Arbeitsblatt durchführt.

Prozedere:
1) Den Zellzeiger in die Zeile stellen, ab der der Auszug aus der Textdatei importiert werden soll.
2) Drücken der Tastenkombination Alt+F8, um den Makrodialog aufzurufen; das Makro "Text_Importieren" auswählen und Button "Ausführen" anklicken.
3) Es öffnet sich dann der Dateiauswahldialog, in dem das Verzeichnis angezeigt wird, in dem sich diese Exceldatei befindet.
3a) Eingeblendet sich alle *.txt bzw. *.csv-Dateien.
3b) Die gewünschte Datei suchen/auswählen und Öffnen-Button klicken bzw. Abbrechen-Button.
4) Die Textdatei wird ab der Zeile mit dem Zellzeiger importiert und gleichzeitig einige grundlegenden Spalten-Formatierungen durchgeführt.

Das Makro geht vom vorliegenden Datenbestand aus:
Dieser besitzt 7 Spalten, wobei die Spalten A+B Datumsformat haben, die Spalte F hat Währungsformat und die restlichen Spalten Textformat.
Im Arbeitsblatt "Auszüge" habe ich 2 Musterimporte durchgeführt.
Die entscheidenden Stellen im Makro habe ich mit Kommentar versehen (Makroeditor: Alt+F11).

 

Makro erfolgreich - CSV tot :-)

Hallo Michael,

der Makro entfernt LF und CR, womit Excel nichts mehr zum Falschmachen hat ;-)
(siehe GIRO_Test4)

Nein - ich habe es nicht vollautomatisiert. Nur Daten aus (bisher) XML einlesen, ein wenig Formatkorrektur und Sätze in die Haupttabelle kopieren. Da man ja das CSV korrekt öffnen (statt Importieren) kann, werde ich es halt umbauen ...

Danke jedenfalls
Josef

 

Freut mich.

Viele Grüße
Michael

 

Hallo Anton,

Exl - nomen est omen ? :-)

Vielen Danke für Deine Hilfe. Der Makro macht den Job gut, ich konnte meine gesamten Jahresbuchungen damit einlesen.
Ist für mich Anlass wieder mal etwas zu programmieren ;-)
Ich werde noch Felder weglassen und die Reihenfolge ändern.
Leider haben sich einige Beträge zu meinen Ungunsten um Größenordnungen verändert - ich bin dabei, der Bank beizubringen, dass sie nicht Komma und Punkt nach Belieben vertauschen soll :-(
(sie haben nach dem Umstieg auf ein neues SAP System gröbere Probleme ...)