let
Source = Excel.CurrentWorkbook(){[Name="Table1"]}[Content],
#"Split Column by Delimiter" = Table.SplitColumn(Source, "Patient/Acct", Splitter.SplitTextByDelimiter("(", QuoteStyle.Csv), {"Patient/Acct.1", "Patient/Acct.2"}),
#"Changed Type" = Table.TransformColumnTypes(#"Split Column by Delimiter",{{"Patient/Acct.1", type text}, {"Patient/Acct.2", type text}}),
#"Split Column by Delimiter1" = Table.SplitColumn(#"Changed Type", "Patient/Acct.2", Splitter.SplitTextByEachDelimiter({")"}, QuoteStyle.Csv, true), {"Patient/Acct.2.1", "Patient/Acct.2.2"}),
#"Removed Columns" = Table.RemoveColumns(#"Split Column by Delimiter1",{"Patient/Acct.2.2"})
in
#"Removed Columns"