Ich möchte eine Textdatei (test.usr) in Excel einlesen. Die Textdatei in eine Tabelle einlesen ist kein Problem. Aber nun möchte ich dafür kein Extra-Tabellenblatt erstellen, sondern die Datei in ein Array einlesen. Die Textdatei besteht aus Zahlen und Buchstaben, die mit einem Semikolon getrennt sind. Die Textdatei kann unterschiedlich lang sein, aber dennoch weiss ich genau, was an welcher Stelle steht. Z.B. an der 6. Stelle in der Textdatei steht immer die Artikelnummer. Nachdem die Datei in das Array gelesen wurde, sollen diese Daten in verschiedene blätter übertragen werden. Das Makro dafür ist schon fertig, da ich vorher die Textdatei in eine Tabelle eingelesen habe und z.B. Import!A6 in Berechnungen!C2 übertragen habe.
Wenn man die Daten anders als mit einem Semikolon trennen muss, um sie in ein Array einzulesen, wäre es auch kein Problem!
Das vierte Datum aus dem Array in ein anderes Blatt transferieren, müsste doch so gehen, oder:
Sheets("Berechnungen").cells(1,6)=Textarray(4)
Danke für eure Hilfe !!!!!
Dennis