Добрый вечер! Как превратить все женские фамилии в мужскую форму фамилии PowerQuery? Убрав формулой лишние а в окончаниях ова, ева, ина. Как поставить отметку в отдельном столбце фамилии заканчивающиеся на ов, ев, ин, ова, ева, ина. Файл прикреплен. А также как отсечь первые 4 цифры из 9 цифр и образовать новый столбец с новыми значениями?
Добрый вечер! Как превратить все женские фамилии в мужскую форму фамилии PowerQuery? Убрав формулой лишние а в окончаниях ова, ева, ина. Как поставить отметку в отдельном столбце фамилии заканчивающиеся на ов, ев, ин, ова, ева, ина. Файл прикреплен. А также как отсечь первые 4 цифры из 9 цифр и образовать новый столбец с новыми значениями?kaiyrkz0
let lst={"ова","ева","ина"}, f=(x)=>if List.Contains(lst,Text.End(x,3)) then Text.RemoveRange(x,Text.Length(x)-1,1) else x, from = Excel.CurrentWorkbook(){[Name="Таблица1"]}[Content], to = Table.AddColumn(from,"New",(r)=>f(r[Фамилия])) in to
[/vba] или вот так [vba]
Код
let lst={"ова","ева","ина"}, f=(x)=>if List.Contains(lst,Text.End(x,3)) then Text.TrimEnd(x,"а") else x, from = Excel.CurrentWorkbook(){[Name="Таблица1"]}[Content], to = Table.AddColumn(from,"New",(r)=>f(r[Фамилия])) in to
[/vba]
[vba]
Код
let lst={"ова","ева","ина"}, f=(x)=>if List.Contains(lst,Text.End(x,3)) then Text.RemoveRange(x,Text.Length(x)-1,1) else x, from = Excel.CurrentWorkbook(){[Name="Таблица1"]}[Content], to = Table.AddColumn(from,"New",(r)=>f(r[Фамилия])) in to
[/vba] или вот так [vba]
Код
let lst={"ова","ева","ина"}, f=(x)=>if List.Contains(lst,Text.End(x,3)) then Text.TrimEnd(x,"а") else x, from = Excel.CurrentWorkbook(){[Name="Таблица1"]}[Content], to = Table.AddColumn(from,"New",(r)=>f(r[Фамилия])) in to