MyTetra Share
Делитесь знаниями!
Замена значений по списку
Время создания: 21.02.2022 12:33
Текстовые метки: Power Query, Replace
Раздел: Разные закладки - MSO - Excel - Power Query
Запись: xintrea/mytetra_db_adgaver_new/master/base/16454359928in1yauw0c/text.html на raw.githubusercontent.com

let

   source = #table(

      {"Найти", "Заменить"},

      {

         {" ",""},

         {"SAUF",""},

         {"/","-"},

         {",","-"},

         {".",""}

      }

   ),

   Справочник=Table.ToRecords(source)

in

   Справочник

 

//========================================================================

let

    //справочник символов для замены

    source_справочник = #table(

      {"Найти", "Заменить"},

      {

         {" ",""},

         {"SAUF",""},

         {"/","-"},

         {",","-"},

         {".",""}

      }

   ),

   Справочник1=Table.ToRecords(source_справочник),

 

    //источник основной таблицы

    Источник = Excel.CurrentWorkbook(){[Name="Таблица1"]}[Content],

    #"Строки с примененным фильтром" = Table.SelectRows(Источник, each ([Column1] <> null)),

    #"Другие удаленные столбцы" = Table.SelectColumns(#"Строки с примененным фильтром",{"Column1"}),

    #"Удаленные дубликаты" = Table.Distinct(#"Другие удаленные столбцы"),

    #"Текст в верхнем регистре" = Table.TransformColumns(#"Удаленные дубликаты",{{"Column1", Text.Upper, type text}}),

   

    //замена символов по списку

    #"Добавлен пользовательский объект" = Table.AddColumn(#"Текст в верхнем регистре", "Item", each List.Accumulate(Справочник1,[Column1],(state,current)=>Text.Replace(state,current[Найти],current[Заменить]))),

    #"Удаленные столбцы" = Table.RemoveColumns(#"Добавлен пользовательский объект",{"Column1"}),

 

in

    #"Удаленные столбцы"

  

 

Так же в этом разделе:
 
MyTetra Share v.0.65
Яндекс индекс цитирования