I want to add columns across filtered rows in power query

I have a dataset in Excel which looks like this:

I want to remove the staff shops and add the corresponding column values to their corresponding dotcom stores. So, A Staff Shop's corresponding dotcom would be A dotcom. The output should look this:

Please note the name of the stores are for illustration only and not single characters. Also, there are more than 30 columns in the dataset.

In Excel, I filtered the column for the staff shops and noted their names in a new tab, then manually searched each name and used subtotal and replaced the dotcom store values, deleting the staff shops.
The data is updated every month with new stores added. I am looking for a way to automate this, and any help would be appreciated. I also went to chatgpt with this, but the steps mentioned only lead to errors.

Try

let Source = Excel.CurrentWorkbook(){[Name="Table1"]}[Content],
#"Filtered Rows" = Table.Distinct(Table.SelectRows(Source, each not Text.Contains([Store_Name], "Staff Shop")), {"Store_Name"}),
#"Replaced Value" = Table.ReplaceValue(Source,"Staff Shop","Dotcom",Replacer.ReplaceText,{"Store_Name"}),
#"Removed Columns" = Table.RemoveColumns(#"Replaced Value",{"Str_ID"}),
#"Unpivoted Other Columns" = Table.UnpivotOtherColumns(#"Removed Columns", {"Store_Name"}, "Attribute", "Value"),
#"Pivoted Column" = Table.Pivot(#"Unpivoted Other Columns", List.Distinct(#"Unpivoted Other Columns"[Attribute]), "Attribute", "Value", List.Sum),
#"Merged Queries" = Table.NestedJoin(#"Pivoted Column", {"Store_Name"}, #"Filtered Rows", {"Store_Name"}, "Table1", JoinKind.LeftOuter),
#"Expanded Table1" = Table.ExpandTableColumn(#"Merged Queries", "Table1", {"Str_ID"}, {"Str_ID"}),
#"Reordered Columns" = Table.ReorderColumns(#"Expanded Table1",Table.ColumnNames(Source))
in  #"Reordered Columns"

alternate version that might work faster for large data sets

let Source = Excel.CurrentWorkbook(){[Name="Table1"]}[Content],
#"Filtered Rows" = Table.Distinct(Table.SelectRows(Source, each not Text.Contains([Store_Name], "Staff Shop")), {"Store_Name"}),
#"Replaced Value" = Table.ReplaceValue(Source,"Staff Shop","Dotcom",Replacer.ReplaceText,{"Store_Name"}),
#"Removed Columns" = Table.RemoveColumns(#"Replaced Value",{"Str_ID"}),
#"Grouped Rows" = Table.Group(#"Removed Columns", {"Store_Name"}, {{"data", each let 
    #"Unpivoted Other Columns" = Table.UnpivotOtherColumns(_, {"Store_Name"}, "Attribute", "Value")
    in Table.Pivot(#"Unpivoted Other Columns", List.Distinct(#"Unpivoted Other Columns"[Attribute]), "Attribute", "Value", List.Sum)
, type table }}),
List = List.RemoveItems(List.Union(List.Transform(#"Grouped Rows"[data], each Table.ColumnNames(_))),{"Store_Name"}),
#"Expanded Data" = Table.ExpandTableColumn(#"Grouped Rows", "data", List,List),
#"Merged Queries" = Table.NestedJoin(#"Expanded Data", {"Store_Name"}, #"Filtered Rows", "Table1", JoinKind.LeftOuter),
#"Expanded Table1" = Table.ExpandTableColumn(#"Merged Queries", "Table1", {"Str_ID"}, {"Str_ID"}),
#"Reordered Columns" = Table.ReorderColumns(#"Expanded Table1",Table.ColumnNames(Source))
in  #"Reordered Columns"