powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / как разбить текст на части?
25 сообщений из 40, страница 1 из 2
как разбить текст на части?
    #36317637
Бзз
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Уважаемые!! Очень надо. подскажите, плииз..

есть название модели (текст) - в первой ячейке.
есть количество этой модели (число) - во второй ячейке.
можно ли построить список этой модели в столбце из такого же количества строк,что задано во второй ячейке?

пример:
/Классика/4/

надо, чтоб получилось:
/Классика/
/Классика/
/Классика/
/Классика/

============================
мои мысли - ПОВТОР. в ячейке появляется
/КлассикаКлассикаКлассикаКлассика/ без пробелов
а дальше как?
мысли раползаются в разные стороны. помогите!!!

спасибо))
...
Рейтинг: 0 / 0
как разбить текст на части?
    #36317722
f
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Бзз, если вы более конкретно сформулируете, в каком виде у вас исходные данные и что вы в итоге хотите получить, вам скорей всего помогут. Приложите файл с примером.
...
Рейтинг: 0 / 0
как разбить текст на части?
    #36317870
m
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
m
Гость
Можна макросом.
Выделяете все значения, с которыми необходимо провести манипуляции (выделить значения только в одной колонке!). Последний элемент делайте вручную. Формулы можна вставить как значения. У меня текстовые значения в колонке 3 (С), количество повторений в 4ой (D).
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
Sub test()
Dim i, j, x, countall

x = Selection.Row
countall = Selection.Rows.Count -  1 

For i =  1  To countall
    For j =  1  To Cells(x,  4 ).Value -  1 
    Rows(x +  1 ).EntireRow.Insert
    Next j
Range(Cells(x,  3 ), Cells(x + Cells(x,  4 ).Value,  3 )).Select
Selection.SpecialCells(xlCellTypeBlanks).Select
Selection.FormulaR1C1 = "=R[-1]C"
x = x + Cells(x,  4 ).Value
Next i

End Sub
...
Рейтинг: 0 / 0
как разбить текст на части?
    #36317929
Бзз,
=ПОВТОР(СЦЕПИТЬ(A1;СИМВОЛ(10));B1)
...
Рейтинг: 0 / 0
как разбить текст на части?
    #36317937
Бзз
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
для F - файл с примером.
m - спасибо огромное,буду пробовать. хотя я такой чайник))
...
Рейтинг: 0 / 0
как разбить текст на части?
    #36317938
Бзз,

Только в формате ячейки галочку поставить "Переносить по словам".
...
Рейтинг: 0 / 0
как разбить текст на части?
    #36317951
Бзз
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Гость&Гость, неее.. надо по строкам! а не в одну ячейку
причем число (количество) изменяется. а формула должна работать.

у меня в примере там все есть. вроде понятно
...
Рейтинг: 0 / 0
как разбить текст на части?
    #36318249
Бзз
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
уважаемый F , где же Вы?

мне говорили,что это сделать невозможно. так ли это?

m - ничего у меня не получилось. я не поняла, как Ваш макрос заставить работать.
...
Рейтинг: 0 / 0
как разбить текст на части?
    #36318520
Бзз
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
всем спасибо.
задача решена!
...
Рейтинг: 0 / 0
как разбить текст на части?
    #36318522
m
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
m
Гость
И как решена ?
В чем сложность с макросом ?
...
Рейтинг: 0 / 0
как разбить текст на части?
    #36318562
Бзз
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
m!
решена без макроса. =ВЫБОР. номер_индекса - СУММ диапазонов +1. а значения - по адресам ячеек с наименованиями моделей.

сложность-то во мне - я не умею макросами пользоваться. мне надо на пальцах)). с формулами мне проще.

Вам - отдельное спасибо. за Ваш труд.
...
Рейтинг: 0 / 0
как разбить текст на части?
    #36318859
Deggasad
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
выложите решение
...
Рейтинг: 0 / 0
как разбить текст на части?
    #36318866
Фотография vikttur
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
http://www.planetaexcel.ru/forum.php?thread_id=11427
...
Рейтинг: 0 / 0
как разбить текст на части?
    #36319511
Deggasad
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ну не знаю...
мне не нравятся формулы, которые предполагают изменение при изменении исходных диапазонов. Уж лучше дополнительную строку ввести на мой взгляд (см. пример), хотя это личное дело каждого.
...
Рейтинг: 0 / 0
как разбить текст на части?
    #36320119
Бзз
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
vikttur - вы меня опередили))

Deggasad - как красиво!!! Вы - умница!

только задача моя усложнилась несвязанными диапазонами.
попробую сама разобраться
...
Рейтинг: 0 / 0
как разбить текст на части?
    #36320151
Бзз
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
vikttur - вы меня опередили))

Deggasad - как красиво!!! Вы - умница!

только задача моя усложнилась несвязанными диапазонами.
попробую сама разобраться
...
Рейтинг: 0 / 0
как разбить текст на части?
    #36321048
Фотография vikttur
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
DeggasadУж лучше дополнительную строку ввести на мой взгляд.
И я того же мнения. Если расчеты облегчаются и доп.столбец/строка не во вред - почему бы и нет?
Deggasad, доп.формулу можно несколько укоротить:
=ЕСЛИ(C5="";"";СУММ($C$7:D11))
В одномерном ИНДЕКС можно лишнее пропускать:
ИНДЕКС(массив_в_строке;2)) - второй столбец;
ИНДЕКС(массив_в_столбце;2)) - вторая строка.
...
Рейтинг: 0 / 0
как разбить текст на части?
    #36321403
Deggasad
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
vikttur
Deggasad, доп.формулу можно несколько укоротить:
=ЕСЛИ(C5="";"";СУММ($C$7:D11))
Это кому как нравится.

vikttur
В одномерном ИНДЕКС можно лишнее пропускать:
ИНДЕКС(массив_в_строке;2)) - второй столбец;
...
А вот тут позволю себе отступление:
одна из причин за что я люблю использовать для реализации каких-либо небольших (а иногда и больших) задач формулы Эксель и прочие возможности без VBA - это тот момент, что формулы без проблем работают если открыть тот же файл в OpenOffice (это сейчас актуально, т.к. за ПО все таки придется платить и например наша компания на многих филиалах и подразделениях экономит, типа им хватит чтобы табличку нарисовать и ОО).
Так вот представьте себе все формулы действительно конвертируются без проблем, а в функции индекс даже если массив одномерный, то нужно задавать именно Index(массив_в_строке;;2) , в противном случае выдает ошибку. Можете проверить, может в новых версиях это исправлено, но раньше точно было так.
После того как я наткнулся на это различие - не пользуюсь сокращенной записью ИНДЕКСа :)
...
Рейтинг: 0 / 0
как разбить текст на части?
    #36322207
Фотография vikttur
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
По поводу OpenOffice не знал. Возьму на заметку, вдруг понадобится.
Спасибо.
...
Рейтинг: 0 / 0
как разбить текст на части?
    #36323978
Бзз
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Deggasad , не посмотрите файл?
помогите, пожалуйста. тот же список, но с несколькими критериями.

vikttur , чую, что Вы меня не взлюбили))
помогите формулами. а?

Спасибо всем!
...
Рейтинг: 0 / 0
как разбить текст на части?
    #36324393
Бзз,
Зачем такая сложная форма заказа?
...
Рейтинг: 0 / 0
как разбить текст на части?
    #36324527
Бзз
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Гость&ГостьБзз,
Зачем такая сложная форма заказа?

нужна именно такая. это одновременно и БланкЗаказа и Бланк Отгрузки. человеку на отгрузке так удобно.
ой, спасибо Вам за решение!
А у Вас "ДГ" и "ДО" никак по разным столбцам не разнести? это важно, т.к если будет 400 позиций, и они будут перемежаться ДГ/ДО - высока вероятность ошибки. жалко ж, себестоимость изделий не маленькая...

Спасибо всем Большущее!!!
у меня теперь столько вариантов)) вы не думайте, я не нагло списываю, я Учусь!! каждую-каждую формулу подробненько разбираю..да..
...
Рейтинг: 0 / 0
как разбить текст на части?
    #36324590
философ m
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Бззвы не думайте, я не нагло списываю, я Учусь!! каждую-каждую формулу подробненько разбираю..да..
И это очень правильно. Есть такое хорошее латинское выражение: "Non scholae sed vitae discimus", переводиться как "Мы учимся не для школы, но для жизни", так вот в Вашем случае, можна сказать что учитесь Вы не для нас, а для себя, для жизни.
...
Рейтинг: 0 / 0
как разбить текст на части?
    #36324877
Deggasad
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Я думаю форма ввода действительно неудобная.
Либо изначально вводить количество по номенклатуре, либо переходить к конкретной номенклатуре. У Вас по сути одна ячейка - одна позиция, все равно придется в плоский вид переводить. Можно ручками, можно макросом, можно формулами (см. пример)
...
Рейтинг: 0 / 0
как разбить текст на части?
    #36327231
Фотография vikttur
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Бзз [b]vikttur , чую, что Вы меня не взлюбили))
помогите формулами. а?
Откуда такие выводы?
Я даже решение придумал, похожее на решение Deggasad с доп. строкой (но у меня длиннее формула, т.к. не вставлял доп. столбец). Но тогда он (Deggasad, а не столбец :)) выложил решение раньше.
Ваш последний вариант, выложенный на Планете, лучше делать макросами. Ведь, кроме данных по моделям, нужно еще определять блоки по видам покрытия + добавлять данные с листа Нестандарт.
Можно поиздеваться и формулами, но стоит ли?

Оффтоп. Вопрос знающим.
Не могу скачивать архивы с этого форума. Копирую в папку загрузки (браузер Опера). Но что-то типа "хотлинкинг запрещен".
...
Рейтинг: 0 / 0
25 сообщений из 40, страница 1 из 2
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / как разбить текст на части?
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]