Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel
Страницы: 1
RSS
Разделение текста в ячейке, умножение числа из ячейки и обратный сбор в 1 ячейку
 
#1
24.08.2022 14:18:50
Всем добрый день.
Очень тяжелое название темы, поэтому постараюсь объяснить что мне нужно.

Есть некий прайс, который формируется по принципу
Смайлик в юникоде, название игры, -, цена, р

Выглядит так: 📍ATV Drift & Tricks Definitive Edition - 170₽

Что хочу сделать в конечном варианте:
Взять название игры, а цену уменьшить на 25 или 30 % (в формуле *0,75 или *0,7). Далее в новую ячейку записать тоже самое название, но с новой ценой

Т.к. хочу сделать скидку на полный прайс, не хочется каждую строку править вручную. Ниже файл прикрепил, пытался сделать, но загвоздка в лишнем пробеле, который появляется при разделении строчки с названием и ценой. У меня может быть цена 160₽ или 2160₽, но количество знаков всегда 3 или 4 после -.

Формула =ЕСЛИ(ЛЕВСИМВ(Q4;1)=" ";ПРАВСИМВ(Q4;ДЛСТР(Q4)-1);Q4) не удаляет пробелы, из-за этого последующие формулы перестают работать.

Вижу вариант такой, но он мне не подходит:
Написать название игры в А1 ячейку, цену в А2, с наценкой А3, с буквой ₽в ячейку А4 и собрать все по формуле Объединить, но такой вариант не канает, потому что прайс-лист постоянно меняется, и нужно CTRL+C и далее CTRL+V

Надеюсь, понятно объяснил, что хотелось бы видеть. Направьте в нужное русло, чтобы сделать реализацию такой вот штуковины!
Изменено: Сергей Верухин - 24.08.2022 14:21:33
 
 
 
#2
24.08.2022 14:24:53
В R2:
Код
=ПОДСТАВИТЬ(ЕСЛИ(ЛЕВСИМВ(Q2;1)=" ";ПРАВСИМВ(Q2;ДЛСТР(Q2)-1);Q2);СИМВОЛ(160);"")
 
 
 
#3
24.08.2022 14:29:02
Цитата
написал:
В R2:
Код
    [URL=#]?[/URL]       1      =ПОДСТАВИТЬ(ЕСЛИ(ЛЕВСИМВ(Q2;1)=  " "  ;ПРАВСИМВ(Q2;ДЛСТР(Q2)-1);Q2);СИМВОЛ(160);  ""  )  
 
Ля
Так быстро и решение
Спасибо огромнейшее, все работает!
Чуть-чуть до "истины" не добрался, надеялся без помощи форумчан сделать  
 
 
 
#4
24.08.2022 14:30:17
Ещё вариант в R2:
Код
=ЕСЛИ(ИЛИ(ЛЕВСИМВ(Q2;1)=" ";КОДСИМВ(Q2)=160);ПРАВСИМВ(Q2;ДЛСТР(Q2)-1);Q2)
 
 
 
#5
24.08.2022 14:53:59
Power Query
Код
let
    Source = Excel.CurrentWorkbook(){[Name="Table1"]}[Content],
    #"Split Column by Delimiter" = Table.SplitColumn(Source,"Column1",Splitter.SplitTextByEachDelimiter({"-"}, QuoteStyle.Csv, true),{"Column1.1", "Column1.2"}),
    #"Changed Type" = Table.TransformColumnTypes(#"Split Column by Delimiter",{{"Column1.2", type number}}),
    #"Added Custom" = Table.AddColumn(#"Changed Type", "Custom", each [Column1.2]*1.25),
    #"Removed Columns3" = Table.RemoveColumns(#"Added Custom",{"Column1.2"}),
    #"Changed Type1" = Table.TransformColumnTypes(#"Removed Columns3",{{"Custom", type text}}),
    #"Added Custom1" = Table.AddColumn(#"Changed Type1", "Custom.1", each [Custom]&"₽"),
    #"Removed Columns" = Table.RemoveColumns(#"Added Custom1",{"Custom"}),
    #"Inserted Merged Column" = Table.AddColumn(#"Removed Columns", "Merged", each Text.Combine({Text.From([Column1.1], "lt-LT"), [Custom.1]}, "-"), type text),
    #"Removed Other Columns" = Table.SelectColumns(#"Inserted Merged Column",{"Merged"})
in
    #"Removed Other Column
s"
 
 
 
Страницы: 1
Наверх