Office: Einlesen, Bearbeiten und Speichern von Textdateien

Hallo Forum,

ich möchte zur Laufzeit eines Makros von 3 Textdateien (Wochen-, Monats-, Jahresauswertung), den Inhalt jeweils in ein Collection- oder Dictionary-Objekt einlesen (max. sechsstellige Anzahl), Kontonummern falls nicht vorhanden, hinzufügen und nach Abschluß wieder in den Textdateien speichern.

Kann mir da jemand behilflich sein. *cool.gif* Danke!

:)

 

Achso, jede Kontonummer sollte nur einmal vorhanden sein. Hatte ich ganz vergessen!

 

Die Beschreibung ist nicht gerade erschöpfend. Eine Textdatei (X-Auswertung) kann so ziemlich alles sein oder enthalten - vielleicht auch strukturierte Daten, auf die man eine Routine aufsetzen kann.

Ein möglicher Ansatz: Mit der folgenden Funktion wird die gesamte Datei in eine Stringvariable übernommen und könnte im Nachgang mit Split auf Zeilentrennung in Zeilen und einem zweiten Split auf ein (welches?) Trennzeichen in auswertbare Elemente zerlegt werden.
Code:

 

Hallo Eberhard,

danke für Deine Antwort, es war heute Morgen noch etwas früh als ich den Thread eingestellt habe, da war ich noch nicht im Vollbesitz meiner geistigen Kräfte. *wink.gif*

Die Textdateien sehen so aus:

1234
234567
4567
123858580

Ich habe es jetzt beispielhaft so gelöst:

Code:

 

Hallo Eberhard,

gibt es eine Möglichkeit, das Schreiben wieder in die Textdatei zu beschleunigen?

Code:

 

Hallo Jürgen,

bei Stringoperationen und Textdateien orientiere ich mich an Jost Schwider und seiner VB-Tec.de, da er sich dort einige Gedanken um Performance gemacht hat. Schau dich mal um.

Rein gefühlsmäßig würde ich sagen, dass das zeilenweise Schreiben in die Textdatei langsamer ist als das Zusammenstellen des Inhalts in eine Variable und das Schreiben dieses Inhalts im Stück in die Datei. Das betrifft dann analog auch das Lesen in der Textdatei.

 

Hallo Eberhard,

danke für die Info, ich schau mich mal um! So jetzt ist der Thread tatsächlich closed. *wink.gif*

Nice Weekend Dir und allen Anderen natürlich auch! *Smilie