Excel Terminplan konsolidieren

[Coeri]

Hallo! Wow, genau so habe ich mir das vorgestellt :D

erklärst du mir, wie ich da vorgehen muss? das wäre echt spitze und würde mir meine Arbeit sehr erleichtern... 

Beste Grüsse
Coeri

[Jockel]

Hallo, ich habe die beiden relevanten Dateien der Einfachheit wegen in C:\coeri\   "abgelegt" und dann mit Power Query folgenden Code aufgezeichnet...

Code:

let
   Quelle = Folder.Files("C:\coeri\"),
   #"Hinzugefügte benutzerdefinierte Spalte" = Table.AddColumn(Quelle, "Benutzerdefiniert", each Excel.Workbook([Content])),
   #"Erweiterte Benutzerdefiniert" = Table.ExpandTableColumn(#"Hinzugefügte benutzerdefinierte Spalte", "Benutzerdefiniert", {"Data"}, {"Benutzerdefiniert.Data"}),
   #"Erweiterte Benutzerdefiniert.Data" = Table.ExpandTableColumn(#"Erweiterte Benutzerdefiniert", "Benutzerdefiniert.Data", {"Column1", "Column2", "Column3", "Column4"}, {"Benutzerdefiniert.Data.Column1", "Benutzerdefiniert.Data.Column2", "Benutzerdefiniert.Data.Column3", "Benutzerdefiniert.Data.Column4"}),
   #"Entfernte Spalten" = Table.RemoveColumns(#"Erweiterte Benutzerdefiniert.Data",{"Content", "Name", "Extension", "Date accessed", "Date modified", "Date created", "Attributes", "Folder Path"}),
   #"Höher gestufte Header" = Table.PromoteHeaders(#"Entfernte Spalten", [PromoteAllScalars=true]),
   #"Geänderter Typ" = Table.TransformColumnTypes(#"Höher gestufte Header",{{"Datum", type any}, {"Column2", type text}, {"Thema", type text}, {"Wer", type text}}),
   #"Gefilterte Zeilen" = Table.SelectRows(#"Geänderter Typ", each ([Datum] <> "Datum")),
   #"Geänderter Typ1" = Table.TransformColumnTypes(#"Gefilterte Zeilen",{{"Datum", type date}}),
   #"Sortierte Zeilen" = Table.Sort(#"Geänderter Typ1",{{"Datum", Order.Ascending}}),
   #"Umbenannte Spalten" = Table.RenameColumns(#"Sortierte Zeilen",{{"Column2", "Was"}})
in
   #"Umbenannte Spalten"

 
Ergebnis..:

Arbeitsblatt mit dem Namen 'Terminplan'
	A	B	C	D
1	Datum	Was	Thema	Wer
2	02.08.2018	STB, STM	Evaluationsauswertungen	Ich
3	02.08.2018	STW	Evaluationsauswertungen	Ich
4	20.08.2018	STW	Evaluations- / Planungssitzung, EGO 6 -Aufgaben verteilen	Alle
5	27.08.2018	STB, STM	Evaluations- / Planungssitzung, 396 - Ziel: Lesung der Entwürfe BK / Überarbeitung VPA	Alle
6	15.12.2018	STB, STM	Erste Entwürfe BK auf dem Extranet für die Gegenlesung (bitte selber organisieren und informieren)	Autoren
7	02.01.2019	STB, STM	Gegengelesenen Unterlagen sind auf dem Extranet / erstes leichtes Layout durch SDBB	Ich
8	05.01.2019	STW	Erste Entwürfe auf dem Extranet / Bereits Gegengelesen	Autoren
9	21.01.2019	STB, STM	Lesesitzung, 396 -Ziel: Lesung der Entwürfe BK / Überarbeitung VPA	Alle
10	30.01.2019	STB, STM	Letzte Unterlagen werden auf dem Extranet gespeichert / def. Layout SDBB	Autoren
11	02.02.2019	STB, STM	Unterlagen sind auf dem Extranet für Endkontrolle	Ich
12	05.02.2019	STW	Lesesitzung, EGO 6 -Korrekturen -Abklären: Brauchen die Autoren ein GzD Dok?	Alle
13	07.02.2019	STW	Korrekturen sind auf dem Extranet	Ich
14	15.02.2019	STW	Alle Unterlagen überarbeitet auf dem Extranet für letzte Korrekturen	Autoren
15	03.03.2019	STW	Alle Unterlagen sind kontrolliert / GzD-Versionen	Autoren
16	07.03.2019	STW	Layout wird vorgenommen / Kandidatenversion erstellen	Ich
17	18.03.2019	STB, STM	Gut-zum-Druck-Sitzung QV19, 396 Ziel: Fertigstellung BK und VPA	Alle
18	30.03.2019	STB, STM	Allte Unterlagen sind fixfertig und bereit für den Druck	Alle
19	09.04.2019	STW	GzD-Sitzung findet statt	Alle
20	15.04.2019	STW	Druckauftrag wird versandt (gemäss Bestellschein)	Ich
21	30.04.2019	STB, STM	Druck der definitiven Prüfungsunterlagen	Ich
22	05.05.2019	STB, STM	Versand der definitiven Prüfungsunterlagen	Vertrieb
23	15.05.2019	STW	Versand der Unterlagen	Vertrieb
24	01.06.2019	STB, STM	Prüfungen in der Schule und in den Betrieben

Verwendete Systemkomponenten: [Windows (32-bit) NT 6.01] MS Excel 2010

Diese Tabelle wurde mit Tab2Html (v2.6.0) erstellt. ©Gerd alias Bamberg

[Coeri]

Danke...

Kann ich diesen Code nun einfach bei den Makros aufzeichnen und ausführen (natürlich mit anpassung meines Quellpfades)? 
Wie ist dass, wenn ich nun noch mehr Tabellen als nur die beiden Test-Dateien habe, die zusammengefasst werden sollen? Geht dass dann auch?

Sorry, bin wie gesagt kein Excel-Spezialist und mit Makros habe ich schon lange nicht mehr gearbeitet. 

Danke für deine Geduld!

[Jockel]

Hallo, nein. Das ist kein VBA...!!! Das ist Power Query... KEIN Makro... Wenn kein Anderer zur Hilfe eilt  (mit einer kleinen Anleitung) muss das warten. Bis heute Abend...

[Coeri]

Ich kann leider kein Add-In wie das Power Query installieren, da ich dies für meine Arbeit benötige und da leider keine eigenen Sachen installieren kann/darf. 
Kein Stress, das hat Zeit :)

[shift-del]

Hi

In deiner Version ist PQ Bestandteil von Excel.

[Jockel]

Hallo, wenn du wirklich XL2016 benutzt, wie du angibst, ist Power Query integriert... Nix mit installieren... Wer sagt das denn?

Aber die Version in der Arbeit ist..??? Los, stopp, schade...

[Jockel]

Hi

In deiner Version ist PQ Bestandteil von Excel.

Hi Detlef,  in der Arbeit ist bestimmt XL2000 im Einsatz... ... würde mich nicht wundern...

[Coeri]

Hallo

Nein, da steht Microsoft Office Excel 2016
da müsst ihr mir einfach erklären, wo ich das Power Query genau finde...?

[WillWissen]

Hi,

gehe zum Menü Daten; dort findest du alles ganz links unter abrufen und transformieren.