The code below has a line that groups on serial number, counts the rows and also brings in all data. It does not require the Reorder column steps and these were taken out. You should be able to paste this data "as-is" into your existing advanced editor.
let
Source = Excel.Workbook(File.Contents("C:\Users\mguckel\Documents\New Unscrubbed-Enrichment.xlsx"), null, true),
Table_crosstab_Sheet = Source{0}[Data],
#"Promoted Headers" = Table.PromoteHeaders(Table_crosstab_Sheet, [PromoteAllScalars=true]),
#"Removed Columns" = Table.RemoveColumns(#"Promoted Headers",{"% Spared At Depot", "% Spare within 150 Miles Onhand", "Line", "% Spare Component Incoming", "TM - Sparing Score", "Actual Line End Date", "Asset Quantity Missing Site", "Backline Provider", "Is Line Expired", "Aging Label", "Is Outsourced ?", "MostRecentOrder ShipDate Label", "MostRecentOrder Order Number Label", "Hit Onhand Target", "Is Networking?", "Is Asset Line?", "Est. Server/Storage Enrichment %", "Asset Quantity Server/Storage", "CNTD Asset Number", "% Spared", "% Spared In Country", "TM - Sparing Score - Is Spared?", "Is Included In Sparing % ?", "Line Term", "Service From Location Has Error ?", "CountryCode For Summary", "__FilterEndCustomerTop200", "Component Qty", "Asset Quantity", "Asset Quantity Networking", "Has Spare Onhand", "Is Covered ?", "CNTD Installed Component", "Covered Component Quantity", "ComponentQuantityPerAsset", "Contract Quantity", "Cont Line ID", "ContractLineAddress SAP Plant Key", "ContractLine DrivingDistance Miles", "ContractLine DrivingTime Minutes", "CountryCode", "CtDistComponentPerAsset", "CtDistMaterialGroupPerAsset", "DONOTUSE__EstMonthlyRateUSD", "ERP", "Has Spare Within 150 Miles?", "Has Spare In Country ? ", "Has Spare Incoming to Country", "Has Spare Incoming", "Hit Enrichment Target", "Hit TM - Sparing Target", "Hit In Country Target", "Hub With Inventory", "LastUpdateDate", "Line Status", "Location Key", "Min Contract SLA From Demand", "Nearest SAPFSL Distance", "Nearest SAPFSL", "Number of Records", "Record Level (group)", "Is Covered", "Sap Id", "Sla Label", "Description", "Matgrp (group)", "Manf", "StockStatus", "AZ AV INV", "BLR AV INV", "Avg Aging HFR/MFR", "Status", "Asset Description", "Continent", "NC AV INV", "SBA AV INV", "TX AV INV", "HubOption1", "HubOption2", "Asset SKU", "Most Recent Order", "End Customer", "ContractLineAddress WhseID", "AMS AV INV", "Currency", "KY_AV_INV", "SNG AV INV"}),
#"Grouped Rows" = Table.Group(#"Removed Columns", {"Serial Number"}, {{"AllData", each _, type table [Customer Name=number, Ship To Customer=number, Contract ID=number, Actual Line Start Date=number, ContractLine Address1=number, ContractLine City=number, ContractLine State=number, ContractLine Zip=number, Contractline CountryName=number, Contractline CountryCode=number, Region=number, Est Monthly Rate=number, SLA Term Name=number, Parts Provider=number, External3PSLaborProvider=number, Component=number, SLA Description=number, Contract Line Create Date=number, Service From Location=number, MFG Name=number, MostRecentOrder OrderNumber=number, MostRecentOrder Product=number, MostRecentOrder ShipDate=number, Owner=number, Record Level=number, Serial Number=number, Site Audit Create Date=number, Site Audit Description=number, Site Audit Incident Number=number, Site Audit Last Event Code=number, Site Audit Status=number, Component Description=number, Matgrp=number, Aging=number, FailureRateCategory=number, StockStatusDescription=number, Sub Inventory And Incoming=number, Incoming In Country=number, Incoming 250KM=number, Incoming With Subs=number, Inventory And Incoming=number, Inventory Onhand In Country=number, Inventory Onhand Within 250KM=number, Inventory Onhand=number, Component Quantity Site Audit Status ADDED=number, Component Quantity Site Audit Status EXPECTED=number, Component Quantity Site Audit Status FOUND=number, Component Quantity Site Audit Status OTHER=number]}, {"SerialNumberCount", each Table.RowCount(_), type number}}),
#"Removed Columns1" = Table.RemoveColumns(#"Grouped Rows",{"Serial Number"}),
#"Expanded AllData" = Table.ExpandTableColumn(#"Removed Columns1", "AllData", {"Customer Name","Ship To Customer","Contract ID","Actual Line Start Date","ContractLine Address1","ContractLine City","ContractLine State","ContractLine Zip","Contractline CountryName","Contractline CountryCode","Region","Est Monthly Rate","SLA Term Name","SLA Description","Parts Provider","External3PSLaborProvider","Contract Line Create Date","Service From Location","Serial Number","Record Level","MFG Name","Component Description","Component","Matgrp","MostRecentOrder OrderNumber","MostRecentOrder Product","MostRecentOrder ShipDate","Owner","Site Audit Create Date","Site Audit Description","Site Audit Incident Number","Site Audit Last Event Code","Site Audit Status","Aging","FailureRateCategory","StockStatusDescription","Inventory Onhand","Incoming With Subs","Inventory And Incoming","Sub Inventory And Incoming","Inventory Onhand In Country","Incoming In Country","Inventory Onhand Within 250KM","Incoming 250KM","Component Quantity Site Audit Status ADDED","Component Quantity Site Audit Status EXPECTED","Component Quantity Site Audit Status FOUND","Component Quantity Site Audit Status OTHER"})
in
#"Expanded AllData"
