Office: Werte einer externen Datei in array schreiben und nutzen

Hallo Gemeinde,
ich habe eine Datei in der ich Daten zweier Tabellen zusammen führe.
Hierbei werden von jeder Tabelle nur die Werte bestimmter Spalten in eine weitere Tabelle geschrieben.

Ich habe also Tabelle 1, Tabelle 2 und Tabelle 3
In Tabelle 1 und zwei stehen Werte die in deren Zeilen in einer bestimmten Spalte identisch sind.

Nun kopiere ich über arrays unterschiedliche Spaltenwerte in Tabelle 3
Also aus Tabelle 1 den Wert der Spalte 2 und 3 z.B. und aus Tabelle 2 die Werte aus Spalte 1 und 4

Da die Werte in Tabelle 2 recht umfangreich sind und evt. mal überarbeitet werden müssen, habe ich mir überlegt diese in eine externe Datei auszulagern und bei bedarf mir diese zu holen.
Das eigentlich alles schon funktioniert wenn ich alle Tabellen in der gleichen Datei habe, müsste ich "nur noch" das Array welches heute die Werte der Tabelle 2 enthält aus einer externen Datei hole.

- öffne externe Datei
- schreibe Tabelle komplett in array
- schliesse externe Datei
- verarbeite array in erster Datei

Hat jemand eine Idee wie ich die Werte der externen Datei ins Array legen kann ?

vielen Dank

:)

 

Hallo Name?,

ich hoffe, mir ist beim Lesen der langen Vorgeschichte der Kern der Frage nicht entgangen. *wink.gif*

Blind getippt, als Skizze:

Code:

Anstelle die komplette Tabelle (.cells) gemäß Deiner Forderung in das Array zu schreiben, kann man dies sicher auch auf ein sinniges Maß (Usedrange?) beschränken. Du bist sicher fit genug, daraus was zu basteln.

Grüße
EarlFred

 

Das sieht sehr gut aus, vielen Dank ( kurz und bündig *biggrin.gif* )

 

Hallo Name?,

zum Kern der Aufgabe gibt's auch nicht mehr zu schreiben, außer die eine Zeile, die ich noch in den Code gemogelt habe - nur der Vollständigkeit halber.

Grüße
EarlFred

 

Moin,

ich häng mich mal hier drauf.

Excel 2003:

Ich brauche aus einer großen 'Daten.xls' (bis zu 35000 Zeilen bei 14 Spalten) nur vier bestimmte Spalten (auseinanderliegend), die ich gerne schnell in vier Arrays einlesen würde. An anderer Stelle sah ich so etwas: Code:

Schon nicht schlecht, aber es fehlt hier der externe Dateiname 'Daten.xls' dabei, das bekomme ich nicht hin.

Außerdem ist hier leider die Zeilenanzahl (35000) fest angegeben. In meinem Fall würde ich lieber die Spalte(n) komplett lesen und hinterher die höchste Indexnummer irgendwie(?) zurückbekommen.

Vielen Dank für die Tipps oder einen link auf einen post, wo es schon steht und den ich nicht gefunden habe! :-)

 

Hallo Name?,

Code:

Versuche, damit auf eine geschlossene Datei zuzugreifen, dürften allerdings scheitern.

Geh doch anders vor: Bestimme die letzte genutzte Zeile des Bereichs (das meinst Du vermutlich mit "Indexnummer", oder? Codebeispiele zu tausenden im Netz) und lies nur ein, was Du brauchst. Oder kaufst Du 200 Packungen Milch und schüttest den Rest, den Du nicht brauchst, einfach weg?


Grüße
EarlFred

 

Hallo EarlFred,

vielen Dank für Deine schnelle Antwort, die ich leider nicht mitbekam, weil ich darüber gar nicht per mail informiert wurde, obwohl ich eigentlich sofortige Mailbenachrichtigung angekreuzt hatte - sehr seltsam!

However:

Wenn die Datei nicht geöffnet ist, bekomme ich die Fehlermeldung 9 "Index außerhalb des gültigen Bereichs". So geschickt finde ich diese Fehlermeldung nicht, um ehrlich zu sein!

Genau. Mit/durch Deinen Hinweis habe ich es jetzt erst einmal so begonnen:

Code:

Jetzt fehlt mir noch, dass die Daten.xls-Datei schon offen sein könnte, dann würde man sie nutzen wollen, statt einem dann unbrauchbares Workbooks.Open("E:\...").

Sollte auf der anderen Seite "Daten.xls" doch geöffnet werden müssen, wäre es gut, sie könnte im gleichen Verzeichnis wie die Makro-Datei gefunden werden, statt einen absoluten Pfad nehmen zu müssen. Was gäbe es da? CurDir hilft da wohl eher nicht, denke ich!

Schönes WE allerseits