Hi,
This M code works
let
Source = Excel.CurrentWorkbook(){[Name="Data"]}[Content],
#"Unpivoted Other Columns" = Table.UnpivotOtherColumns(Source, {"File Upload", "Additional Information:", "Add as an Ariba Watcher to your request?", "Additional Items?", "Deliver To:", "PFP/Internal Order Code:", "Cost Center:", "Requester Business Function / Department", "Priority:", "Email Address:", "Requested By:", "Last modified time", "Name", "Email", "Completion time", "Start time", "ID"}, "Attribute", "Value"),
#"Inserted Text After Delimiter" = Table.AddColumn(#"Unpivoted Other Columns", "Text After Delimiter", each Text.AfterDelimiter([Attribute], ":"), type text),
#"Replaced Value" = Table.ReplaceValue(#"Inserted Text After Delimiter","","1",Replacer.ReplaceValue,{"Text After Delimiter"}),
#"Extracted Text Before Delimiter" = Table.TransformColumns(#"Replaced Value", {{"Attribute", each Text.BeforeDelimiter(\_, ":"), type text}}),
#"Pivoted Column" = Table.Pivot(#"Extracted Text Before Delimiter", List.Distinct(#"Extracted Text Before Delimiter"[Attribute]), "Attribute", "Value"),
#"Removed Columns" = Table.RemoveColumns(#"Pivoted Column",{"Text After Delimiter"})
in
#"Removed Columns"
Hope this helps.