Duplikate, Zeilen einfuegen...

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Hallo Jürgen,
zunächst einmal vielen Dank für dein Interesse - das stimmt mich gleich sehr viel zuversichtlicher !
Ich habe gerade kurz mit einem EDV-Berater meiner Hausbank telefoniert.
Es ist in der Tat so, daß die Spaltenanzahl variiert - sofern man bei csv überhaupt von Spalten reden kann, aber das macht die Verständigung einfacher...
Er erklärte mir das so: Je nach ausgewähltem Zeitraum auf der Bank-Homepage wird dann eine csv zusammengestellt - danach wird dann eine Art "Maske" darüber gelegt u. NUR das UsedRange (wie es in xl genannt wird) wird gesendet.
Auf meine Frage, warum "leere Spalten" nicht einfach mit ";" aufgefüllt werden u. somit immer eine konstante Spaltenanzahl gesendet wird, wurde ich auf die hauseigene Online-Banking-Software verwiesen - die Jahreslizenzgebühr will ja auch irgendwie gerechtfertigt sein...
Die max. Spaltenanzahl beträgt 17 (also Q), was in der Überschrift dem Verwendungszweck-8 entspricht...
Zu Überschneidungen kann es kommen, da auf der Bank-HP automatisch der aktuelle Saldo als Obergrenze u. als Untergrenze dieses Datum minus 1 Monat voreingestellt ist. Da ich diese csv-Daten an unterschiedlichen Wochentagen abrufe u. ich mir auch nicht das letzte Abrufdatum merke (die Bank merkt sich das auch nicht für mich u. ändert dementsprechend die Auswahlmaske... ;-) ), lasse ich es einfach bei diesen Voreinstellungen u. importiere alles.
Mit dem 3. CommandButton (CB) lösche ich ja dann wieder die "alten" Daten. Doch nun kann es auch noch vorkommen, daß die letzte Abfrage z.B. am 13.08.08 vormittags stattfand u. nachmittags noch etwas gebucht wurde (s. die mittlere csv-Beispieldatei). Somit kann es also auch zu mehreren Duplikaten (allerdings nur bei dem nun letzten Saldo-Datum) kommen. Also ist die nun noch verbleibende Anz. der Duplikate unbestimmt u. nicht vorhersehbar...
"überschneidet sich jeweils das Ende der einen mit dem Anfang der nächten .csv-Datei?" - JA, aber erst NACH dem 3. CB...
Behelfsmäßig habe ich dieses Problem bereits gelöst - s. vorherige Mappe - interessant wäre lediglich noch die Variante mit dem "Vergleich in 2 Sheets"...
Hier noch 3 csv-Dateien zum Experimentieren u. 1 xls mit der ich selber gerade bastele...
Würdest du dir bitte diesen Code mal anschauen u. mir sagen, wie ich den umbauen muss - Bezug zu den Zahlen in Spalte C des 1. Sheet ("csv-Info") u. könnte das dann auch in anderen Mappen gebrauchen...
Ich würde ihn gern für den 4. CB (CB5) benutzen... Wie gesagt: Ich würde gern zuerst das bestehende Projekt beenden u. danach dann die "Feinheiten" angehen...
MfG Dirk
(der nicht Urs heißt... Aber das ist mir auch schon passiert... Sollte also auch nicht peinlich sein... ;-) )

Hallo Jürgen,
wären wir jetzt beim Bowling könntest du laut schreien STRIKE !
Dein letzter Vorschlag ist ein Meisterstück !
Die Sache mit dem "Öffnen mit..." ist mir zwar bekannt, aber ich nutze den Rechtsklick...
Mir ist aber klar, warum du die Tastaturvariante bevorzugst: So schnell, wie du hier die Codezeilen "reinhämmerst", wird dir wohl monatlich eine Tastatur verglühen, während der Wechsel zur Mouse dabei fast hinderlich ist u. sie somit ein trauriges Dasein am Schreibtischrand fristet... ;-)
Leider habe ich wieder etwas zu bemängeln:
Mit deiner Mappe funktionierte der Import reibungslos - sogar mit beiden csv-Varianten,, also sowohl mit dem Bank-Original, (einzeilig) wie auch mit einer in EXCEL erzeugten csv (spaltenähnlich).
Und da du alles kurz u. knackig in einem einzigen Modul untergebracht hast, war es dann nur eine Sache von Sekunden - Modul in meine Originaldatei kopiert, gestartet und... "Fehlermeldung..." + Debugger springt gleich auf die zweite Zeile zu Dim FSO As New FileSystemObject .
Du hast anscheinend meine VBA-Kenntnisse gewaltig überschätzt - denn ich wühlte mich mehr als 1 Std. durch die Hilfe, googelte u. grübelte - bis ich dann die Lösung fand:
---- Verweis zu Microsoft Scripting Runtime muß aktiviert werden ----
Das hättest du mir doch sagen müssen - ich stand schon kurz vor einem Herzinfarkt... ;-)
Doch die Freude über das Resultat wog das alles sofort wieder auf !
Beim "Durchspielen" sämtlicher Sonderfälle stiess ich auf ein kleines Manko:
Was du geschrieben hattest;
"...die aktuelle Lösung erwartet in S5:Z5 bereits vorbereitete, mit Formeln versehene Zellen, damit das herunterkopieren funktioniert. Wenn das nicht gewährleistet ist, müssten die Formeln und Gültigkeitsprüfungen vom Code explizit eingefügt werden."
ist so nicht ganz richtig.
Wenn der Bereich für die Datensätze - also ab Zeile 5 - leer ist, dann wird die Formatierung zerschossen. Ist ja auch eigentlich klar, denn es werden ja die Formate aus den darüberliegenden Zeilen gezogen. Außerdem steht ab T6 eine andere Formel in der Spalte als in T5 - es wird also ab T6 mit einer falschen Formel weitergerechnet...
Ich habe nun einfach in A5 bis A7 jeweils ein Datum eingetragen, welches auch kleiner als das erste Datum in der csv sein musste - dann die csv importiert u. danach die Zeilen 5 bis 7 mittels Gruppierung ausgeblendet (könnten auch gelöscht werden, aber dann müsste man auch die Formeln in T5 u. ab T6 händisch ändern).
Ist zwar etwas umständlich, aber angesichts dessen, daß sich dieses Procedere nur aller 5 Jahre wiederholt, absolut kein Problem - man muss es eben nur wissen...
Beim Testen mit wechselnden csv merkte ich dann auch, wie Recht du hattest:
"Das ist u.a. ein Grund, warum ich eine Dateiauswahl durch den User vorziehen würde (wenn es komfortabel sein soll, mit der wahrscheinlich gewünschten Datei als Vorauswahl)..."
Könntest du ein solches Feature noch in den Code einbauen ?
Die csv-Dateien befinden sich immer im gleichen Ordner wie die xls ; jüngste csv als Vorauswahl...
Wenn du noch immer Lust dazu hast, dann lass' dir auch ruhig Zeit - es ist nicht dringend.
Sollte dieser Thread dann schon im Archiv sein, kannst du mir auch direkt mailen (Addi im Quelltext).
MfG Dirk

Beliebteste Forumthreads (12 Monate)

14
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

300 Forumthreads zu ähnlichen Themen

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

Duplikate, Zeilen einfuegen...

14 Beiträge zum Forumthread Beiträge zu diesem Forumthread

300 Forumthreads zu ähnlichen Themen

VBA Beispiele zu verwandten Themen

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

14
Beiträge zum Forumthread

Beiträge zu diesem Forumthread