Zusammengesetzte Lösung für Podcast 2316 Challenge - Excel-Tipps

Hinweis

Dies ist einer aus einer Reihe von Artikeln, in denen Lösungen für die Podcast 2316-Herausforderung aufgeführt sind.

Nachdem ich alle Ideen der Zuschauer studiert habe, habe ich aus jedem Video meine Lieblingstechniken ausgewählt. Meine endgültige Lösung verwendet diese Schritte:

• Daten aus dem benannten Bereich abrufen
• Löschen Sie die beiden zusätzlichen Schritte, die zu Header heraufstufen und Typ ändern hinzugefügt wurden. Dies verhindert, dass das Suffix aus den Vierteln entfernt werden muss. Vielen Dank an Jason M, Ondřej Malinský und Peter Bartholomew für diese Idee.
• Transponieren
• Header fördern
• Entfernen, obere Zeilen, obere 5 Zeilen. Schöner Trick von MF Wong.
• Ersetzen Sie Q1 durch _Q1. Wiederholen Sie dies für weitere drei Viertel. Danke Jonathan Cooper.
• Geteilt durch Trennzeichen am _. Dieser erstaunliche Schritt hält die Namen in einer Spalte und verschiebt die Viertel in die nächste Spalte. Vorgeschlagen von Fowmy, perfektioniert von Jonathan Cooper.
• (Kein Schritt!) Greifen Sie in die Formelleiste und benennen Sie die Spalten in Mitarbeiter und Quartal um. Vielen Dank, Josh Johnson
• Ersetzen Sie in der Spalte Mitarbeiter nichts durch null
• Abfüllen
• Ändern Sie in der Spalte Quartal null in Gesamt. Diese Idee von Michael Karpfen
• Andere Spalten aufheben. Benennen Sie Attribut in Kategorie in der Formelleiste um
• Pivot Quarters
• Gesamtspalte an das Ende verschieben

Hier ist mein endgültiger Code:

let Source = Excel.CurrentWorkbook()((Name="UglyData"))(Content), #"Transposed Table" = Table.Transpose(Source), #"Promoted Headers" = Table.PromoteHeaders(#"Transposed Table", (PromoteAllScalars=true)), #"Changed Type" = Table.TransformColumnTypes(#"Promoted Headers",(("Category Description", type text), ("Administrative", type number), ("Holiday", Int64.Type), ("PTO/LOA/Jury Duty", Int64.Type), ("Project A", type number), ("Project B", type number), ("Project C", type number))), #"Removed Top Rows" = Table.Skip(#"Changed Type",5), #"Replaced Value" = Table.ReplaceValue(#"Removed Top Rows","Q1","_Q1",Replacer.ReplaceText,("Category Description")), #"Replaced Value1" = Table.ReplaceValue(#"Replaced Value","Q2","_Q2",Replacer.ReplaceText,("Category Description")), #"Replaced Value2" = Table.ReplaceValue(#"Replaced Value1","Q3","_Q3",Replacer.ReplaceText,("Category Description")), #"Replaced Value3" = Table.ReplaceValue(#"Replaced Value2","Q4","_Q4",Replacer.ReplaceText,("Category Description")), #"Split Column by Delimiter" = Table.SplitColumn(#"Replaced Value3", "Category Description", Splitter.SplitTextByDelimiter("_", QuoteStyle.Csv), ("Employee", "Qtr")), #"Changed Type1" = Table.TransformColumnTypes(#"Split Column by Delimiter",(("Employee", type text), ("Qtr", type text))), #"Replaced Value4" = Table.ReplaceValue(#"Changed Type1","",null,Replacer.ReplaceValue,("Employee")), #"Filled Down" = Table.FillDown(#"Replaced Value4",("Employee")), #"Replaced Value5" = Table.ReplaceValue(#"Filled Down",null,"Total",Replacer.ReplaceValue,("Qtr")), #"Unpivoted Other Columns" = Table.UnpivotOtherColumns(#"Replaced Value5", ("Employee", "Qtr"), "Attribute", "Value"), #"Pivoted Column" = Table.Pivot(#"Unpivoted Other Columns", List.Distinct(#"Unpivoted Other Columns"(Qtr)), "Qtr", "Value", List.Sum), #"Reordered Columns" = Table.ReorderColumns(#"Pivoted Column",("Employee", "Attribute", "Q1", "Q2", "Q3", "Q4", "Total")) in #"Reordered Columns"

Jeder, der in diesen Artikeln oder Videos erwähnt wird, gewinnt einen Excel Guru-Patch. Ich habe bereits mehrere verschickt. Wenn Sie keinen erhalten, hinterlassen Sie einen Kommentar zum Video unten.