Округление нескольких значений ячейке и добавление доп.симв

Страница 1 из 1 1
Модератор форума: китин, _Boroda_, DrMini

Округление нескольких значений ячейке и добавление доп.симв (Формулы/Formulas)

ВладимирR

Дата: Суббота, 08.04.2017, 12:29 | Сообщение № 1

Группа: Пользователи

Ранг: Новичок

Сообщений: 15

Репутация: 0 ±

Замечаний: 0% ±

Excel 2013

Друзья, привет!
Не могу разобраться, помогите, пожалуйста :'(

есть список из ячеек с несколькими значениями в каждой, мне необходимо понять как можно :
1) округлить до целых чисел? пытался и через функцию и через встроенную в панели кнопку, и искал на форуме, но именно как у меня в примере не нашел.
2)Возможно ли добавить к каждому числу по символу?
(данные числа - размеры, мне нужно будет добавить к первому числу,перед ним непосредственно W, ко второму перед ним H и к третьему D

Данные буквы это обозначения ширины, высоты и глубины.

Заранее благодарю за время и помощь!

К сообщению приложен файл: 5769765.xlsx (10.8 Kb)

Ответить

Wasilich

Дата: Суббота, 08.04.2017, 12:54 | Сообщение № 2

Группа: Друзья

Ранг: Старожил

Сообщений: 1232

Репутация: 326 ±

Замечаний: 0% ±

2003

1) В ячейках значения в виде текста, а иначе и быть не может если их там несколько, да еще и буквы присутствуют. Как же текст округлить?
Разнесите текст по столбцам с разделителем х (икс), округлите значения и дальше собирайте в новый текст.
2) Могли бы и показать в примере, как надо то.

Ответить

Nic70y

Дата: Суббота, 08.04.2017, 12:59 | Сообщение № 3

Группа: Друзья

Ранг: Экселист

Сообщений: 9130

Репутация: 2415 ±

Замечаний: 0% ±

Excel 2010

Код

="W"&ОКРУГЛ(ЛЕВБ(ПОДСТАВИТЬ(A1;"x";ПОВТОР(" ";15));15);0)&"H"&ОКРУГЛ(ПСТР(ПОДСТАВИТЬ(A1;"x";ПОВТОР(" ";15);2);ПОИСК("x";A1)+1;15);0)&"D"&ОКРУГЛ(ПРАВБ(ПОДСТАВИТЬ(A1;"x";ПОВТОР(" ";15));15);0)

ЮMoney 41001841029809

Ответить

ВладимирR

Дата: Суббота, 08.04.2017, 13:27 | Сообщение № 4

Группа: Пользователи

Ранг: Новичок

Сообщений: 15

Репутация: 0 ±

Замечаний: 0% ±

Excel 2013

Nic70y, СПАСИБО!!!!!!! hands

Ответить

Wasilich

Дата: Суббота, 08.04.2017, 13:59 | Сообщение № 5

Группа: Друзья

Ранг: Старожил

Сообщений: 1232

Репутация: 326 ±

Замечаний: 0% ±

2003

А так?

К сообщению приложен файл: 1688245.xls (38.5 Kb)

Ответить

buchlotnik

Дата: Суббота, 08.04.2017, 16:42 | Сообщение № 6

Группа: Заблокированные

Ранг: Участник клуба

Сообщений: 3442

Репутация: 929 ±

Замечаний: 20% ±

2010, 2013, 2016 RUS / ENG

как-то так наUDFилось

[vba]

Код

Function WHD$(t$)
    s = Split(t, "x")
    WHD = "W" & Format(s(0), "0") & " x " & _
        "H" & Format(s(1), "0") & " x " & _
        "D" & Format(s(2), "0")
End Function

[/vba]

К сообщению приложен файл: 5769765-3-.xlsm (17.9 Kb)

Ответить

Wasilich

Дата: Суббота, 08.04.2017, 17:04 | Сообщение № 7

Группа: Друзья

Ранг: Старожил

Сообщений: 1232

Репутация: 326 ±

Замечаний: 0% ±

2003

Цитата buchlotnik, 08.04.2017 в 16:42, в сообщении № 6 ()

как-то так наUDFилось

Красиво! Записал! deal

Ответить

AlexM

Дата: Суббота, 08.04.2017, 22:33 | Сообщение № 8

Группа: Друзья

Ранг: Участник клуба

Сообщений: 4517

Репутация: 1130 ±

Замечаний: 0% ±

Excel 2003

buchlotnik, Я бы дополнил так[vba]

Код

Function WHD$(t$)
    s = Split(Replace(t, ",", "."), "x")
    WHD = "W" & Format(Val(s(0)), 0) & " x " & _
        "H" & Format(Val(s(1)), 0) & " x " & _
        "D" & Format(Val(s(2)), 0)
End Function

[/vba]иначе строки типа "10,5W x24,13x7,62" не обрабатываются