Rename all column headers removing part before to separator

Thanks for your help and time Maggi v-juanli-msft  and mussaenda ,

I found the solution combining Text.AfterDelimiter() with List.Zip() and List.Transform in a single command like below, maybe could help someone in the future.

let
    Source = Excel.CurrentWorkbook(){[Name="Table1"]}[Content],
    RenameColumns = Table.RenameColumns( Source, List.Zip( 
                  { 
                    Table.ColumnNames( Source ), 
                    List.Transform(Table.ColumnNames( Source ), each Text.AfterDelimiter( _, ":") ) 
                   } ) )
in
    RenameColumns

Regards