Перенести часть данных с ячейки в другую ячейку

[5mrs]

Доброе время суток, уважаемые форумчане!
Нужно перенести с ячейки часть данных в одну ячейку, а оставшуюся часть в другую.

Как это возможно сделать?

[5mrs]

Пример как должно выглядеть:ПереносДанн.zip

[Hugo121]

"Текст по столбцам" по х. Но сперва скопировать количество в столбец правее, чтоб не затереть.
Макрос тут думаю лишний, работы на 5 секунд.
P.S. не заметил сразу что там есть
Малая сторона Большая сторона
Ну тогда макрос нужен, или UDF - но может быть можно решить административно, чтоб исполнители сразу писали в нужном виде?

[5mrs]

С макросами совсем не дружу

[5mrs]

В нужном виде не может программа выдавать((((

[Hugo121]

Думаю оптимально использовать UDF или макрос, обрабатывающий выделенныый диапазон.

[riniks17]

Что б разделить "Размеры"на два столбца, идите в "Данные"-"Текст по столбцам". Ставьте разделитель х и "программа выдаст в нужном виде". Вставить столбец, преобразовать 7шт просто в 7 тоже труда не составит. Ну и когда всё будет получаться нажмите кнопку "записать макрос" и повторите все действия.

[Hugo121]

Тоже не заметили тонкость задачи?

Вариант UDF:

Function malbol(r As Range, k As String)
    Dim a
    a = Split(Replace(r.Value, Chr(160), ""), "x")
    If k = "m" Then malbol = Application.Min(Val(a(0)), Val(a(1))) Else malbol = Application.Max(Val(a(0)), Val(a(1)))
End Function

На лист в один столбец тянуть

=malbol(F6,"m")

в другой вместо "m" можно написать что угодно другое.

[5mrs]

Сообщение от Hugo121

Тоже не заметили тонкость задачи?

Вариант UDF:

Function malbol(r As Range, k As String)
    Dim a
    a = Split(Replace(r.Value, Chr(160), ""), "x")
    If k = "m" Then malbol = Application.Min(Val(a(0)), Val(a(1))) Else malbol = Application.Max(Val(a(0)), Val(a(1)))
End Function

На лист в один столбец тянуть

=malbol(F6,"m")

в другой вместо "m" можно написать что угодно другое.

Супер! Малая сторона получается! Щас пытаюсь большую сторону получить...
Спасибо огромное! Чувствую потенциал профессионала!!!

[5mrs]

Поставил вместо "m" любое другое и получилась большая сторона! Отлично!