Hallo liebe Gemeinschaft,
ich benötige mal wieder Eure Hilfe.
Ich habe eine Datei, deren Struktur bekannt ist, nicht aber der Dateiname und die Namen der Tabellenblätter.
Nun möchte ich alle Blätter diese Datei in einer neuen Datei auf einem Blatt zusammenfassen, damit ich über die Filterfunktion alle Daten auswerten kann.
Bisher habe ich mal ein Makro zusammengestellt, mit dem ich den Dateinamen und die Namen aller Tabellenblätter der unbekannten, geöffneten Datei aufgelistet bekomme.
Diese Infos stehen auf Blatt 1 der neuen Datei in Spalte A (Blattnamen) und Spalte C (Dateinamen).
Nun soll auf Blatt 2 der neuen Datei die Verknüpfungen mit der unbekannten Datei erzeugt werden.
Das Ganze soll dann so aussehen, dass auf Blatt 2 beginnend mit Zelle C3 zuerst Zellverknüpfungen mit dem ersten Blatt der unbekannten Datei (Name in Liste auf Blatt 1 in Zelle A2) eingefügt werden.
In die Zelle "Blatt2!C3" sollte dann etwa folgendes stehe: =["Name der unbekannten Datei"]"Name von Blatt 1"!C3
Es sollen immer die Spalten C bis X verknüpft werden und jeweils bis zur letzten beschriebenen Zeile der unbekannten Datei.
Danach soll in der nun letzten beschriebenen Zeile in Blatt 2 der neuen Datei das nächste Tabellenblatt der unbekannten Datei angefügt werden.
Solange, bis alle Blätter (ca. 22 mit jeweils ca. 50-300 Zeilen) verknüpft sind.
Ich hoffe, dass ich das Problem einigermaßen verständlich beschrieben habe und mein Wunsch nicht zu kompliziert ist.
Vielleicht hat auch jemand einen ganz anderen Ansatz für das Problem.
Meine VBA-Kenntnisse sind leider nicht sehr gut.
Vielen herzlichen Dank schon mal im Voraus.
Gruß Thomas
ich benötige mal wieder Eure Hilfe.
Ich habe eine Datei, deren Struktur bekannt ist, nicht aber der Dateiname und die Namen der Tabellenblätter.
Nun möchte ich alle Blätter diese Datei in einer neuen Datei auf einem Blatt zusammenfassen, damit ich über die Filterfunktion alle Daten auswerten kann.
Bisher habe ich mal ein Makro zusammengestellt, mit dem ich den Dateinamen und die Namen aller Tabellenblätter der unbekannten, geöffneten Datei aufgelistet bekomme.
Diese Infos stehen auf Blatt 1 der neuen Datei in Spalte A (Blattnamen) und Spalte C (Dateinamen).
Nun soll auf Blatt 2 der neuen Datei die Verknüpfungen mit der unbekannten Datei erzeugt werden.
Das Ganze soll dann so aussehen, dass auf Blatt 2 beginnend mit Zelle C3 zuerst Zellverknüpfungen mit dem ersten Blatt der unbekannten Datei (Name in Liste auf Blatt 1 in Zelle A2) eingefügt werden.
In die Zelle "Blatt2!C3" sollte dann etwa folgendes stehe: =["Name der unbekannten Datei"]"Name von Blatt 1"!C3
Es sollen immer die Spalten C bis X verknüpft werden und jeweils bis zur letzten beschriebenen Zeile der unbekannten Datei.
Danach soll in der nun letzten beschriebenen Zeile in Blatt 2 der neuen Datei das nächste Tabellenblatt der unbekannten Datei angefügt werden.
Solange, bis alle Blätter (ca. 22 mit jeweils ca. 50-300 Zeilen) verknüpft sind.
Ich hoffe, dass ich das Problem einigermaßen verständlich beschrieben habe und mein Wunsch nicht zu kompliziert ist.
Vielleicht hat auch jemand einen ganz anderen Ansatz für das Problem.
Meine VBA-Kenntnisse sind leider nicht sehr gut.
Vielen herzlichen Dank schon mal im Voraus.
Gruß Thomas