Office: Mehrere Excel Dateien zu einer zusammenführen

Helfe beim Thema Mehrere Excel Dateien zu einer zusammenführen in Microsoft Excel Hilfe um das Problem gemeinsam zu lösen; So lang Du den Code nicht zeigst, der zum Einsatz kommt, kann Dir wohl keiner helfen. Dein veröffentlichter Code kann nicht compiled werden, da fehlt... Dieses Thema im Forum "Microsoft Excel Hilfe" wurde erstellt von RookieVBA123, 25. März 2016.

Seite 2 von 3

DRAMBELDIER

drambeldier

Mehrere Excel Dateien zu einer zusammenführen

So lang Du den Code nicht zeigst, der zum Einsatz kommt, kann Dir wohl keiner helfen. Dein veröffentlichter Code kann nicht compiled werden, da fehlt schon die Definition von fq.

Warum wird das Ziel gefiltert?

drambeldier, 29. März 2016

#16
ALOYS78

aloys78

Hallo Rookie,

ich habe mal eine Reihe von Formalfehlern korrigiert, so dass der Code jetzt durchlaufen müßte.

Gruß
Aloys
Code:

Sub CommandButton1_Click()
Dim a As Long
Dim b As Long
Dim i As Long
Dim j As Long
Dim fso As Object, f As Object, fc As Object, FI As Object
Dim s
Dim OrdnerQuelle As String
Dim Ziel As Worksheet
Dim Quelle As Worksheet

OrdnerQuelle = "C:\Users\Admin\Documents\Arbeit Porr\160228_BTB_Datenbank_VDE812Mitte\Bautagesberichte\"
OrdnerQuelle = ThisWorkbook.Path & "\"
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.GetFolder(OrdnerQuelle) 'Search-Folder
Set fc = f.Files 'Files

Set Ziel = ThisWorkbook.Worksheets(1)
With Ziel
.Cells(1, 1) = "Datum"
.Cells(1, 2) = "Name"
.Cells(1, 3) = "Vorname"
.Cells(1, 4) = "BerichtNr."
.Cells(1, 5) = "Seriennummer"
.Cells(1, 6) = "Art"
.Cells(1, 7) = "Anzahl"
.Cells(1, 8) = "Kontrolleur"
.Cells(1, 9) = "Gueltigkeit"
.Cells(1, 10) = "Grenze"
.Cells(1, 11) = "Beteiligte"
.Cells(1, 12) = "Anzahl Beteiligte" 'Bezeichnungen fuer erste Zeile
Range("a2").Select ' erste komplette Zeile selektieren
ActiveWindow.FreezePanes = True 'Einfrieren der ersten Zeile
.Range("A2").AutoFilter 'Filter in erste Zeile einfügen
End With

a = 2 ' Zeile 1 übergehen, enthält Spaltennamen
For Each FI In fc
If Right(FI.Name, Len(ThisWorkbook.Name)) = ThisWorkbook.Name Then GoTo Ende
Workbooks.Open FI
For j = 1 To Worksheets.Count
Set Quelle = Worksheets(j)
'Debug.Print f1; Tab(40); Worksheets(j).Name
b = 0

'While Quelle.Cells(b + 18, 1) ""
For i = 18 To 49
If (Quelle.Cells(21, 37).Value = "Anzahl Beteiligte") Then
Ziel.Cells(a, 1) = Quelle.Cells(9, 11) '"Datum" aus der Quelldatei
Ziel.Cells(a, 2) = Quelle.Cells(7, 11) '"Name" aus der Quelldatei
Ziel.Cells(a, 3) = Quelle.Name '"Vorname" aus der Quelldatei
Ziel.Cells(a, 4) = Quelle.Cells(b + 14, 26) '"BerichtNr." aus der Quelldatei
Ziel.Cells(a, 5) = Quelle.Cells(b + 14, 25) '"Seriennummer" aus der Quelldatei"
Ziel.Cells(a, 6) = Quelle.Cells(b + 14, 32) '"Art" aus der Quelldatei
Ziel.Cells(a, 7) = Quelle.Cells(b + 14, 31) '"Anzahl" aus der Quelldatei
Ziel.Cells(a, 8) = Quelle.Cells(b + 33, 26) '"Kontrolleur" aus der Quelldatei
Ziel.Cells(a, 6) = Quelle.Cells(b + 33, 25) '"Gueltigkeit" aus der Quelldatei
Ziel.Cells(a, 7) = Quelle.Cells(b + 33, 32) '"Grenze" aus der Quelldatei
Ziel.Cells(a, 8) = Quelle.Cells(b + 33, 31) '"Beteiligte" aus der Quelldatei
Ziel.Cells(a, 8) = Quelle.Cells(b + 23, 37) '"Anzahl Beteiligte" aus der Quelldatei

ElseIf (Quelle.Cells(26, 13).Value = "Anzahl Beteiligte") Then
Ziel.Cells(a, 1) = Quelle.Cells(9, 11) '"Datum" aus der Quelldatei
Ziel.Cells(a, 2) = Quelle.Cells(7, 11) '"Name" aus der Quelldatei
Ziel.Cells(a, 3) = Quelle.Name '"Vorname" aus der Quelldatei
Ziel.Cells(a, 4) = Quelle.Cells(b + 14, 14) '"BerichtNr." aus der Quelldatei
Ziel.Cells(a, 5) = Quelle.Cells(b + 14, 13) '"Seriennummer" aus der Quelldatei"
Ziel.Cells(a, 6) = Quelle.Cells(b + 14, 20) '"Art" aus der Quelldatei
Ziel.Cells(a, 7) = Quelle.Cells(b + 14, 19) '"Anzahl" aus der Quelldatei
Ziel.Cells(a, 8) = Quelle.Cells(b + 28, 13) '"Kontrolleur" aus der Quelldatei

ElseIf (Quelle.Cells(22, 25).Value = "Anzahl Beteiligte") Then
Ziel.Cells(a, 1) = Quelle.Cells(9, 11) '"Datum" aus der Quelldatei
Ziel.Cells(a, 2) = Quelle.Cells(7, 11) '"Name" aus der Quelldatei
Ziel.Cells(a, 3) = Quelle.Name '"Vorname" aus der Quelldatei
Ziel.Cells(a, 4) = Quelle.Cells(b + 14, 14) '"BerichtNr." aus der Quelldatei
Ziel.Cells(a, 5) = Quelle.Cells(b + 14, 13) '"Seriennummer" aus der Quelldatei"
Ziel.Cells(a, 6) = Quelle.Cells(b + 14, 20) '"Art" aus der Quelldatei
Ziel.Cells(a, 7) = Quelle.Cells(b + 14, 19) '"Anzahl" aus der Quelldatei
Ziel.Cells(a, 8) = Quelle.Cells(b + 37, 14) '"Kontrolleur" aus der Quelldatei
Ziel.Cells(a, 6) = Quelle.Cells(b + 37, 13) '"Gueltigkeit" aus der Quelldatei
Ziel.Cells(a, 7) = Quelle.Cells(b + 37, 20) '"Grenze" aus der Quelldatei
Ziel.Cells(a, 8) = Quelle.Cells(b + 37, 19) '"Beteiligte" aus der Quelldatei
Ziel.Cells(a, 8) = Quelle.Cells(b + 25, 25) '"Anzahl Beteiligte" aus der Quelldatei

Else
Ziel.Cells(a, 1) = "Fehler"
Ziel.Cells(a, 2) = "Fehler"
Ziel.Cells(a, 3) = "Fehler"
Ziel.Cells(a, 4) = "Fehler"
Ziel.Cells(a, 5) = "Fehler"
Ziel.Cells(a, 6) = "Fehler"
Ziel.Cells(a, 7) = "Fehler"
Ziel.Cells(a, 8) = "Fehler" 'Zeige "Fehler" an
End If
b = b + 1 'b wird um 1 erhöht für das naechste Worksheet
a = a + 1 'a wird um 1 erhöht für das naechste Worksheet
Next i
Next j
Set Quelle = Nothing
Workbooks.Item(2).Close (False)

Ende:
Next FI
Set Ziel = Nothing
End Sub
Klicke in dieses Feld, um es in vollständiger Größe anzuzeigen.

aloys78, 29. März 2016

#17
DRAMBELDIER

drambeldier

Hi Rookie,

das Wichtigste: Leg die Quellen in einen eigenen Ordner und achte darauf, dass beim Aufruf keine andere Excel-Datei geöffnet ist, sonst läuft die ganze Zählerei mit Workbooks(y) und Worksheets(z) vor die Wand.

Gruß
Ralf

drambeldier, 29. März 2016

#18
ALOYS78

aloys78

Mehrere Excel Dateien zu einer zusammenführen

Hallo Rookie,

Nachtrag zum Beitrag #17:

Bitte im vorgeschlagenen Code noch die rot markierte Anweisung entfernen.
Code:

OrdnerQuelle = "C:\Users\Admin\Documents\Arbeit Porr\160228_BTB_Datenbank_VDE812Mitte\Bautagesberichte\"
OrdnerQuelle = ThisWorkbook.Path & "\"
Klicke in dieses Feld, um es in vollständiger Größe anzuzeigen.

Gruß
Aloys

aloys78, 29. März 2016

#19
ROOKIEVBA123

RookieVBA123

Hallo,

hier mal der aktuellste Stand der Dinge, ich habe noch zwei Grafiken zum besseren Verständnis angehängt, die die Struktur der Dokumente zeigt (Zieldatei, Quelldateien).

Zudem habe ich bemerkt, dass keinerlei Output in der Zieldatei festgehalten/gespeichert wird. Daher kann ich schlecht analysieren, wo der Fehler zu finden ist :/

Hoffe auf einen hellen Kopf, der mir aus der Miserie helfen kann.

Gruß, RookieVBA123

Code:

Option Explicit
Sub CommandButton1_Click()
Dim fs As Object, f As Object, file As Object, fc As Object
Dim OrdnerQuelle As String
Dim Ziel As Worksheet
Dim Quelle As Worksheet

OrdnerQuelle = "C:\Users\Admin\Documents\Bautagesberichte\"
Set fs = CreateObject("Scripting.FileSystemObject")
Set f = fs.GetFolder(OrdnerQuelle)
Set fc = f.Files
MsgBox (OrdnerQuelle & " Quelle")

Dim a As Long
Dim b As Long
Dim i As Long
Dim j As Long

Set Ziel = ThisWorkbook.Worksheets(1)
Ziel.Cells(1, 1) = "Datum"
Ziel.Cells(1, 2) = "Name"
Ziel.Cells(1, 3) = "Vorname"
Ziel.Cells(1, 4) = "BerichtNr."
Ziel.Cells(1, 5) = "Seriennummer"
Ziel.Cells(1, 6) = "Art"
Ziel.Cells(1, 7) = "Anzahl"
Ziel.Cells(1, 8) = "Kontrolleur"
Ziel.Cells(1, 9) = "Gueltigkeit"
Ziel.Cells(1, 10) = "Grenze"
Ziel.Cells(1, 11) = "Beteiligte"
Ziel.Cells(1, 12) = "Anzahl Beteiligte" 'Bezeichnungen fuer erste Zeile

'Ziel.Range("A2").Select
'Ziel.FreezePanes = True
'Ziel.Range("A2").Select 'erste Zeile selektieren
'ActiveWorkbook.FreezePanes = True 'Einfrieren der ersten Zeile
'ActiveWorkbook.AutoFilter 'Filter in erste Zeile einfügen

a = 2

For Each file In fc

Workbooks.Open file
For j = 1 To Worksheets.Count

Set Quelle = Worksheets(j)
'MsgBox (Quelle.Cells(9, 11).Value & " QUELLE")
b = 0

For i = 18 To 49

If (Quelle.Cells(21, 37).Value = "Anzahl Beteiligte") Then
Ziel.Cells(a, 1) = Quelle.Cells(9, 11) '"Datum" aus der Quelldatei
Ziel.Cells(a, 2) = Quelle.Cells(7, 11) '"Name" aus der Quelldatei
Ziel.Cells(a, 3) = Quelle.Name '"Vorname" aus der Quelldatei
Ziel.Cells(a, 4) = Quelle.Cells(b + 14, 26) '"BerichtNr." aus der Quelldatei
Ziel.Cells(a, 5) = Quelle.Cells(b + 14, 25) '"Seriennummer" aus der Quelldatei"
Ziel.Cells(a, 6) = Quelle.Cells(b + 14, 32) '"Art" aus der Quelldatei
Ziel.Cells(a, 7) = Quelle.Cells(b + 14, 31) '"Anzahl" aus der Quelldatei
Ziel.Cells(a, 8) = Quelle.Cells(b + 33, 26) '"Kontrolleur" aus der Quelldatei
Ziel.Cells(a, 6) = Quelle.Cells(b + 33, 25) '"Gueltigkeit" aus der Quelldatei
Ziel.Cells(a, 7) = Quelle.Cells(b + 33, 32) '"Grenze" aus der Quelldatei
Ziel.Cells(a, 8) = Quelle.Cells(b + 33, 31) '"Beteiligte" aus der Quelldatei
Ziel.Cells(a, 8) = Quelle.Cells(b + 23, 37) '"Anzahl Beteiligte" aus der Quelldatei

ElseIf (Quelle.Cells(26, 13).Value = "Anzahl Beteiligte") Then
Ziel.Cells(a, 1) = Quelle.Cells(9, 11) '"Datum" aus der Quelldatei
Ziel.Cells(a, 2) = Quelle.Cells(7, 11) '"Name" aus der Quelldatei
Ziel.Cells(a, 3) = Quelle.Name '"Vorname" aus der Quelldatei
Ziel.Cells(a, 4) = Quelle.Cells(b + 14, 14) '"BerichtNr." aus der Quelldatei
Ziel.Cells(a, 5) = Quelle.Cells(b + 14, 13) '"Seriennummer" aus der Quelldatei"
Ziel.Cells(a, 6) = Quelle.Cells(b + 14, 20) '"Art" aus der Quelldatei
Ziel.Cells(a, 7) = Quelle.Cells(b + 14, 19) '"Anzahl" aus der Quelldatei
Ziel.Cells(a, 8) = Quelle.Cells(b + 28, 13) '"Kontrolleur" aus der Quelldatei

ElseIf (Quelle.Cells(22, 25).Value = "Anzahl Beteiligte") Then
Ziel.Cells(a, 1) = Quelle.Cells(9, 11) '"Datum" aus der Quelldatei
Ziel.Cells(a, 2) = Quelle.Cells(7, 11) '"Name" aus der Quelldatei
Ziel.Cells(a, 3) = Quelle.Name '"Vorname" aus der Quelldatei
Ziel.Cells(a, 4) = Quelle.Cells(b + 14, 14) '"BerichtNr." aus der Quelldatei
Ziel.Cells(a, 5) = Quelle.Cells(b + 14, 13) '"Seriennummer" aus der Quelldatei"
Ziel.Cells(a, 6) = Quelle.Cells(b + 14, 20) '"Art" aus der Quelldatei
Ziel.Cells(a, 7) = Quelle.Cells(b + 14, 19) '"Anzahl" aus der Quelldatei
Ziel.Cells(a, 8) = Quelle.Cells(b + 37, 14) '"Kontrolleur" aus der Quelldatei
Ziel.Cells(a, 6) = Quelle.Cells(b + 37, 13) '"Gueltigkeit" aus der Quelldatei
Ziel.Cells(a, 7) = Quelle.Cells(b + 37, 20) '"Grenze" aus der Quelldatei
Ziel.Cells(a, 8) = Quelle.Cells(b + 37, 19) '"Beteiligte" aus der Quelldatei
Ziel.Cells(a, 8) = Quelle.Cells(b + 25, 25) '"Anzahl Beteiligte" aus der Quelldatei

Else
Ziel.Cells(a, 1) = "Fehler"
Ziel.Cells(a, 2) = "Fehler"
Ziel.Cells(a, 3) = "Fehler"
Ziel.Cells(a, 4) = "Fehler"
Ziel.Cells(a, 5) = "Fehler"
Ziel.Cells(a, 6) = "Fehler"
Ziel.Cells(a, 7) = "Fehler"
Ziel.Cells(a, 8) = "Fehler" 'Zeige "Fehler" an
End If
b = b + 1 'b wird um 1 erhöht für das naechste Worksheet
a = a + 1 'a wird um 1 erhöht für das naechste Worksheet
Next i
Next j
Set Quelle = Nothing
Workbooks.Item(2).Close (False)
Next file
Set Ziel = Nothing
End Sub
Klicke in dieses Feld, um es in vollständiger Größe anzuzeigen.

RookieVBA123, 30. März 2016

#20
ALOYS78

aloys78

Hallo Rookie,

Zudem habe ich bemerkt, dass keinerlei Output in der Zieldatei festgehalten/gespeichert wird. Daher kann ich schlecht analysieren, wo der Fehler zu finden ist :/
Klicke in dieses Feld, um es in vollständiger Größe anzuzeigen.

Zumindest läuft jetzt der Code durch.

Für eine weitere Hilfstellung ist es notwendig, dass Du Beispiel-Dateien zur Verfügung stellst, zB mind. 1 Quelldatei mit Test-Daten sowie die Zieldatei mit der gewünschten Ergebnisdarstellung.
Ohne die kann ich mit vernünftigem Aufwand auch nicht erkennen, ob Output überhaupt, und wenn, dann auch richtig übertragen wird.

Gruß
Aloys

aloys78, 30. März 2016

#21
LUSCHI

Luschi

Hallo RookieVBA123,

wenn ich mir schöne Bilder anschauen möchte, dann gehe ich in eine Austellung von Bernhard-Viktor Christoph-Carl von Bülow (alias Loriot).
Da kann ich mich besser erfreuen, anstatt Deine bereitgestellten Grafiken in Exceltabellen umzuwandeln.

Gruß von Luschi
aus klein-Paris

PS: Ich staune, wieso fleißige Helfer immer noch reagieren, obwohl Du ihre Forderung nach einem praktischen Beispiel in Form 2er Exceldateien einfach negierst!
Ein bischen mehr Zuarbeit sollte man für den kostenlosen Hilfeservice schon erwarten.

Luschi, 30. März 2016

#22
ROOKIEVBA123

RookieVBA123

Mehrere Excel Dateien zu einer zusammenführen

Guten Abend an alle,

erst einmal vielen Dank für eure Hilfe und Engagement!

Im Anhang befindet sich die Zieldatei, in der alle Einträge übertragen werden sollen und zwei Berichte, die Quelldateien.

Gruß RookieVBA123

RookieVBA123, 30. März 2016

#23
ALOYS78

aloys78

Hallo Rookie,

ist der Code in Deinem Beitrag #20 der aktuelle ?

In der Tabelle 1 der Zieldatei ist die Überschrift nämlich schon vorgetragen, daher wäre der entsprechende Code im ersten Teil des Makros nicht notwendig.

Gruß
Aloys

aloys78, 30. März 2016

#24
ROOKIEVBA123

RookieVBA123

Die Zieldatei ist von mir "per Hand" ohne VBA erzeugt und soll nur darstellen, wie es in der Zieldatei nach der VBA Anweisung aufgebaut sein soll.

Gruß
RookieVBA123

RookieVBA123, 31. März 2016

#25
DRAMBELDIER

drambeldier

Wo ist denn jetzt der aktuelle Code geblieben? Im ursprünglichen Entwurf sollte der in der Zieldatei stecken!

drambeldier, 31. März 2016

#26
ALOYS78

aloys78

Hallo Rookie,

ich habe den Code etwas überarbeitet; es werden die Testdateien mit allen Blättern verarbeitet.
Die Zieldatei befindet sich in einem eigenen Ordner.

Ob die Übertragungsoperationen richtig sind, habe ich nicht überprüft. Das war mir zu mühsam, u.a. wegen Deiner Art der Adressierung.
So ziehe ich es zB vor, Cells(1,"AA") zu schreiben statt Cells(1,27).

Gruß
Aloys

aloys78, 31. März 2016

#27
ROOKIEVBA123

RookieVBA123

Mehrere Excel Dateien zu einer zusammenführen

Hallo drambeldier,aloys78 und liebe Forenmitglieder,

wenn ich das Makro starte, bleibt das Programm ab der 2. Quelldatei stehen und es wird nur die zweite Quelldatei im geöffneten Zustand angezeigt. Allerdings nicht die Zieldatei mit den übernommenen Werten durch das Makro. Die Zieldatei wird gar nicht angezeigt, nachdem ich das Makro Aufrufe, genauer es ist noch vollkommen leer. Die angezeigten Daten in der Zieldatei in "Tabelle1" ist noch von aloys78.

Öffne ich das Makro falsch?
Wende ich es falsch an?

Zwei Beispiel Quelldateien hänge ich wieder an und die Zieldatei mit dem VBA Code

Gruß
RookieVBA123

RookieVBA123, 2. April 2016

#28
DRAMBELDIER

drambeldier

Hi Rookie,

wichtig ist die Ordnerstruktur: Ziel gehört in einen eigenen Ordner, aus dem heraus auch das Makro zu starten ist.

Die Quellen gehören in einen anderen, aktell "C:\Users\Admin\Documents\Bautagesberichte\".

Wenn Du das Makro aus einer Quelle heraus startest, erntest Du nur Quark, also schmeiß den Code dort heraus.

Gruß
Ralf

drambeldier, 2. April 2016

#29
ALOYS78

aloys78

Hallo Rookie,

Öffne ich das Makro falsch?
Wende ich es falsch an?
Klicke in dieses Feld, um es in vollständiger Größe anzuzeigen.

Das weiß ich nicht, ich war nicht dabei.
In meinem letzten Beitrag (#27) hatte ich geschrieben, das die Zieldatei in einem eigenen Ordner liegen muß.

Ausgangssituation:
Es ist keine Quelldatei geöffnet, auch nicht die Zieldatei.
Die Quelldateien liegen im Ordner, dessen Pfad im Code vorgegeben ist.

Vorgehen:
Zieldatei öffnen
Button drücken

Gruß
Aloys

aloys78, 2. April 2016

#30

(Du musst angemeldet oder registriert sein, um eine Antwort erstellen zu können.)

Seite 2 von 3

Thema:

Mehrere Excel Dateien zu einer zusammenführen

Die Seite wird geladen...

Mehrere Excel Dateien zu einer zusammenführen - Similar Threads - Excel Dateien zusammenführen
Name der Datei durch Excel geändert
in Microsoft Excel Hilfe
Name der Datei durch Excel geändert: Hallo und guten Abend, Die Datei wird mittels Button (VBA) zwischen gesichert. Das Makro sichert zuvor die Datei und erstellt zus. eine Sicherungsdatei mit der Erweiterung Beispiel-"Sich"....
Zugriff auf nicht vorhandene Datei seitens Excel
in Microsoft Excel Hilfe
Zugriff auf nicht vorhandene Datei seitens Excel: Hallo, wann immer ich in Excel Daten in eine Zelle gebe, dauert es ca. 1-2 Minuten, bevor Excel die weitere Bearbeitung freigibt. Unten links gibt es den Hinweis "Zugriff auf Datei erfolgt". Dies...
Mehrere Excel Dateien zu einer zusammenführen
in Microsoft Excel Hilfe
Mehrere Excel Dateien zu einer zusammenführen: Hallo, Ich habe ca. 90 Excel Dateien, die alle eine Tabelle mit genau den selben Bezeichnungen enthalten (Material, Werk, Bezeichnung, Stückzahl,...). Nun möchte ich diese 90 Dateien zu einer...
Verschiedene Excel-Dateien in einer Arbeitsmappe als Excel-Sheets zusammenführen
in Microsoft Excel Hilfe
Verschiedene Excel-Dateien in einer Arbeitsmappe als Excel-Sheets zusammenführen: Hallo, gibt es ein Makro oder eine andere Möglichkeit, dass man verschiedene Excel-Dateien in einer Excel-Datei zusammenführt? Hierbei sollen z.B. die einzelnen Dateien als extra-Sheet in einer...
Mehrere Excel Dateien in ein Tabellenblatt zusammenführen
in Microsoft Excel Hilfe
Mehrere Excel Dateien in ein Tabellenblatt zusammenführen: Hello zusammen! Da ich leider für mein Problem über Google keine Lösung finden konnte, wende ich mich vertrauensvoll an euch... :) Meine Arbeitskollegen und ich möchten gerne jeweils eine...
Tabelle aus meheren Excel-Dateien zusammenführen
in Microsoft Excel Hilfe
Tabelle aus meheren Excel-Dateien zusammenführen: Hallo! Ich beschäftige mich schon seit geraumer Zeit mit einer Problemstellung in VBA und benötige eure Hilfe: Bin in VBA ein kompletter Neuling :confused: Ich versuche bestimmte Bereiche...
Excel/Calc: 200 Excel Dateien zu einer Tabelle zusammenführen
in Microsoft Excel Hilfe
Excel/Calc: 200 Excel Dateien zu einer Tabelle zusammenführen: Hallo, wie kann ich aus 200 Excel Dateien mit fortlaufendem Namen (Book1 bis Book200) eine einzige Tabelle erstellen? Die in den einzelnen Dateien enthaltenen Tabellen sind sehr klein, zwischen 2...

Anmelden oder registrieren

Suche

Diese Seite verwendet Cookies, um Inhalte zu personalisieren, diese deiner Erfahrung anzupassen und dich nach der Registrierung angemeldet zu halten.
Auf dieser Website werden Cookies für die Zugriffsanalyse und Anzeigenmessung verwendet.
Wenn du dich weiterhin auf dieser Seite aufhältst, akzeptierst du unseren Einsatz von Cookies.

Akzeptieren Weitere Informationen...

Information ausblenden