Ко всем ячейкам в столбце прибавить название столбца - Мир MS Excel

Регистрация

Напомнить пароль

= Мир MS Excel/Ко всем ячейкам в столбце прибавить название столбца - Мир MS Excel

Старая форма входа

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

Мир MS Excel » Вопросы и решения » Вопросы по Excel » Ко всем ячейкам в столбце прибавить название столбца (Формулы/Formulas)

Ко всем ячейкам в столбце прибавить название столбца

Дата: Среда, 02.09.2015, 18:36 | Сообщение № 1

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

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

Сообщений: 34

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

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

Excel 2010

Есть данные: 100 столбцов на 5000 строк:
Пример:
Материал| Ширина, см| Длина, см| Высота, см|
фарфор 36,5 55,5 40,5

1. Нужно получить: ко всем ячейкам в столбце прибавить название столбца (ячейка A1,B1,C1 и т.д.)

Материал|фарфор Ширина, см|36,5 Длина, см|55,5 Высота, см|40,5

2. Идеально нужно в итоге: засунуть все 100 ячеек строки в одну ячейку:

Материал|фарфор
Ширина, см|36,5
Длина, см|55,5
Высота, см|40,5

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

Ответить

Дата: Среда, 02.09.2015, 18:48 | Сообщение № 2

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

Ранг: Ветеран

Сообщений: 770

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

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

Excel 2013

так?

Код

=$A$1&A3&СИМВОЛ(10)&$B$1&B3&СИМВОЛ(10)&$C$1&C3&СИМВОЛ(10)&$D$1&D3&СИМВОЛ(10)&$E$1&E3&СИМВОЛ(10)&$F$1&F3

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

KSV.VBA@gmail.com
Яндекс.Деньги: 410011921213333

Ответить

Дата: Среда, 02.09.2015, 18:49 | Сообщение № 3

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

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

Сообщений: 4513

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

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

Excel 2003

Код

=A$1&A2&СИМВОЛ(10)&B$1&B2&СИМВОЛ(10)&C$1&C2&СИМВОЛ(10)&D$1&D2&СИМВОЛ(10)&E$1&E2&СИМВОЛ(10)&F$1&F2

PS. Чуть опоздал.

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

Номер мобильного модема (без голосовой связи)
9269171249 МегаФон, Московский регион.

Сообщение отредактировал AlexM - Среда, 02.09.2015, 18:51

Ответить

Дата: Среда, 02.09.2015, 19:55 | Сообщение № 4

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

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

Сообщений: 34

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

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

Excel 2010

Спасибо!

У меня в реальности иногда под двести столбцов.
Как-то можно клонировать код? А то ручками набирать код для двухсот столбцов замучаешься!

Я бы хранил файл в 200 столбцов как идеальный, а лишний код в ячейке отрезал бы под конкретное количество столбцов.

Сообщение отредактировал regnus - Среда, 02.09.2015, 19:56

Ответить

Дата: Четверг, 03.09.2015, 08:56 | Сообщение № 5

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

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

Сообщений: 8791

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

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

Excel 2010

1) копируем таблицу
2) вставляем в блокнот
3) копируем "пробел" между словами в блокноте
3) вставляем в "Что"
4) в "Чем" пишем |
5) Заменить все
6) Правка - Выделить все ctrl+c
7) вставить в эксель
'8) формат ячейки - выравнивание - переносить по словам

не, что-то чуть не так пошло - но почти

немного, одно формулой доработать

ЮMoney 41001841029809

Сообщение отредактировал Nic70y - Четверг, 03.09.2015, 08:59

Ответить

Дата: Четверг, 03.09.2015, 09:43 | Сообщение № 6

Группа: Модераторы

Ранг: Местный житель

Сообщений: 16675

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

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

2003; 2007; 2010; 2013 RUS

В ячейку В1 пишите вот это

Код

=A1&"&СИМВОЛ(10)&"&ПСТР(ЯЧЕЙКА("адрес";A1);2;9)&"&"&ПОДСТАВИТЬ(ЯЧЕЙКА("адрес";A2);"$";)

Для В1 даст такую конструкцию - &СИМВОЛ(10)&A$1&A1) и тяните вправо на столько столбцов, сколько нужно в формуле (для каждого столбца формула будет размножаться - &СИМВОЛ(10)&A$1&A1&СИМВОЛ(10)&B$1&B1, ...). Потом отрезаем первый кусок "&СИМВОЛ(10)&", копируем полученное и вставляем значением.
Только почитайте еще технические характеристики http://www.excelworld.ru/publ....-1-0-99 , чтобы не нарваться на ограничения

К сообщению приложен файл: 76896269.xlsm (32.1 Kb)

Скажи мне, кудесник, любимец ба’гов...
Платная помощь:
Boroda_Excel@mail.ru
Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995

Ответить

Дата: Четверг, 03.09.2015, 11:18 | Сообщение № 7

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

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

Сообщений: 34

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

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

Excel 2010

Не получается протянуть!

Высылаю 200 столбцов со значениями.
Прошу протянуть результаты на 200 столбцов.

Спасибо.

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

Ответить

Дата: Четверг, 03.09.2015, 12:25 | Сообщение № 8

Группа: Модераторы

Ранг: Местный житель

Сообщений: 16675

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

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

2003; 2007; 2010; 2013 RUS

А причем здесь Ваши значения? Я Вам написал как быстро сделать формулу типа той, что ниже. А вставляйте Вы ее сами куда Вам нужно. Кстати, я там изменил немного, скачайте файл из моего пред. сообщения еще раз

Код

A$1&A1&СИМВОЛ(10)&B$1&B1&СИМВОЛ(10)&C$1&C1&СИМВОЛ(10)&D$1&D1&СИМВОЛ(10)&E$1&E1&СИМВОЛ(10)&F$1&F1&СИМВОЛ(10)&G$1&G1&СИМВОЛ(10)&H$1&H1&СИМВОЛ(10)&I$1&I1&СИМВОЛ(10)&J$1&J1&СИМВОЛ(10)&K$1&K1&СИМВОЛ(10)&L$1&L1&СИМВОЛ(10)&M$1&M1&СИМВОЛ(10)&N$1&N1&СИМВОЛ(10)&O$1&O1&СИМВОЛ(10)&P$1&P1&СИМВОЛ(10)&Q$1&Q1&СИМВОЛ(10)&R$1&R1&СИМВОЛ(10)&S$1&S1&СИМВОЛ(10)&T$1&T1&СИМВОЛ(10)&U$1&U1&СИМВОЛ(10)&V$1&V1&СИМВОЛ(10)&W$1&W1&СИМВОЛ(10)&X$1&X1&СИМВОЛ(10)&Y$1&Y1&СИМВОЛ(10)&Z$1&Z1&СИМВОЛ(10)&AA$1&AA1&СИМВОЛ(10)&AB$1&AB1&СИМВОЛ(10)&AC$1&AC1&СИМВОЛ(10)&AD$1&AD1&СИМВОЛ(10)&AE$1&AE1&СИМВОЛ(10)&AF$1&AF1&СИМВОЛ(10)&AG$1&AG1&СИМВОЛ(10)&AH$1&AH1&СИМВОЛ(10)&AI$1&AI1&СИМВОЛ(10)&AJ$1&AJ1&СИМВОЛ(10)&AK$1&AK1&СИМВОЛ(10)&AL$1&AL1&СИМВОЛ(10)&AM$1&AM1&СИМВОЛ(10)&AN$1&AN1&СИМВОЛ(10)&AO$1&AO1&СИМВОЛ(10)&AP$1&AP1&СИМВОЛ(10)&AQ$1&AQ1&СИМВОЛ(10)&AR$1&AR1&СИМВОЛ(10)&AS$1&AS1&СИМВОЛ(10)&AT$1&AT1&СИМВОЛ(10)&AU$1&AU1&СИМВОЛ(10)&AV$1&AV1&СИМВОЛ(10)&AW$1&AW1&СИМВОЛ(10)&AX$1&AX1&СИМВОЛ(10)&AY$1&AY1&СИМВОЛ(10)&AZ$1&AZ1&СИМВОЛ(10)&BA$1&BA1&СИМВОЛ(10)&BB$1&BB1&СИМВОЛ(10)&BC$1&BC1&СИМВОЛ(10)&BD$1&BD1&СИМВОЛ(10)&BE$1&BE1&СИМВОЛ(10)&BF$1&BF1&СИМВОЛ(10)&BG$1&BG1&СИМВОЛ(10)&BH$1&BH1&СИМВОЛ(10)&BI$1&BI1&СИМВОЛ(10)&BJ$1&BJ1&СИМВОЛ(10)&BK$1&BK1&СИМВОЛ(10)&BL$1&BL1&СИМВОЛ(10)&BM$1&BM1&СИМВОЛ(10)&BN$1&BN1&СИМВОЛ(10)&BO$1&BO1&СИМВОЛ(10)&BP$1&BP1&СИМВОЛ(10)&BQ$1&BQ1&СИМВОЛ(10)&BR$1&BR1&СИМВОЛ(10)&BS$1&BS1&СИМВОЛ(10)&BT$1&BT1&СИМВОЛ(10)&BU$1&BU1&СИМВОЛ(10)&BV$1&BV1&СИМВОЛ(10)&BW$1&BW1&СИМВОЛ(10)&BX$1&BX1&СИМВОЛ(10)&BY$1&BY1&СИМВОЛ(10)&BZ$1&BZ1&СИМВОЛ(10)&CA$1&CA1&СИМВОЛ(10)&CB$1&CB1&СИМВОЛ(10)&CC$1&CC1&СИМВОЛ(10)&CD$1&CD1&СИМВОЛ(10)&CE$1&CE1&СИМВОЛ(10)&CF$1&CF1&СИМВОЛ(10)&CG$1&CG1&СИМВОЛ(10)&CH$1&CH1&СИМВОЛ(10)&CI$1&CI1&СИМВОЛ(10)&CJ$1&CJ1&СИМВОЛ(10)&CK$1&CK1&СИМВОЛ(10)&CL$1&CL1&СИМВОЛ(10)&CM$1&CM1&СИМВОЛ(10)&CN$1&CN1&СИМВОЛ(10)&CO$1&CO1&СИМВОЛ(10)&CP$1&CP1&СИМВОЛ(10)&CQ$1&CQ1&СИМВОЛ(10)&CR$1&CR1&СИМВОЛ(10)&CS$1&CS1&СИМВОЛ(10)&CT$1&CT1&СИМВОЛ(10)&CU$1&CU1&СИМВОЛ(10)&CV$1&CV1&СИМВОЛ(10)&CW$1&CW1&СИМВОЛ(10)&CX$1&CX1&СИМВОЛ(10)&CY$1&CY1&СИМВОЛ(10)&CZ$1&CZ1&СИМВОЛ(10)&DA$1&DA1&СИМВОЛ(10)&DB$1&DB1&СИМВОЛ(10)&DC$1&DC1&СИМВОЛ(10)&DD$1&DD1&СИМВОЛ(10)&DE$1&DE1&СИМВОЛ(10)&DF$1&DF1&СИМВОЛ(10)&DG$1&DG1&СИМВОЛ(10)&DH$1&DH1&СИМВОЛ(10)&DI$1&DI1&СИМВОЛ(10)&DJ$1&DJ1&СИМВОЛ(10)&DK$1&DK1&СИМВОЛ(10)&DL$1&DL1&СИМВОЛ(10)&DM$1&DM1&СИМВОЛ(10)&DN$1&DN1&СИМВОЛ(10)&DO$1&DO1&СИМВОЛ(10)&DP$1&DP1&СИМВОЛ(10)&DQ$1&DQ1&СИМВОЛ(10)&DR$1&DR1&СИМВОЛ(10)&DS$1&DS1&СИМВОЛ(10)&DT$1&DT1&СИМВОЛ(10)&DU$1&DU1&СИМВОЛ(10)&DV$1&DV1&СИМВОЛ(10)&DW$1&DW1&СИМВОЛ(10)&DX$1&DX1&СИМВОЛ(10)&DY$1&DY1&СИМВОЛ(10)&DZ$1&DZ1&СИМВОЛ(10)&EA$1&EA1&СИМВОЛ(10)&EB$1&EB1&СИМВОЛ(10)&EC$1&EC1&СИМВОЛ(10)&ED$1&ED1&СИМВОЛ(10)&EE$1&EE1&СИМВОЛ(10)&EF$1&EF1&СИМВОЛ(10)&EG$1&EG1&СИМВОЛ(10)&EH$1&EH1&СИМВОЛ(10)&EI$1&EI1&СИМВОЛ(10)&EJ$1&EJ1

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

Скажи мне, кудесник, любимец ба’гов...
Платная помощь:
Boroda_Excel@mail.ru
Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995

Ответить

Дата: Четверг, 03.09.2015, 13:10 | Сообщение № 9

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

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

Сообщений: 34

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

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

Excel 2010

У меня не получается!
я же не профи...
мне нужно протянуть 200 столбцов а вы предлагаете ковыряться в формулах где я не профи.

Ответить

Дата: Пятница, 04.09.2015, 11:12 | Сообщение № 10

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

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

Сообщений: 34

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

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

Excel 2010

Сорри, поправили файл.

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

Ответить

Дата: Пятница, 04.09.2015, 16:39 | Сообщение № 11

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

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

Сообщений: 34

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

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

Excel 2010

АУууу

...никто не поможет?

Ответить

Дата: Пятница, 04.09.2015, 16:52 | Сообщение № 12

Группа: Модераторы

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

Сообщений: 7019

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

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

Excel 2007;2010;2016

Саша в посте №6 ссылка битая.У меня не открывается
[moder]Исправила ссылку[/moder]

Не судите очень строго:я пытаюсь научиться
ЯД 41001877306852

Сообщение отредактировал Pelena - Пятница, 04.09.2015, 16:56

Ответить

Дата: Пятница, 04.09.2015, 18:10 | Сообщение № 13

Группа: Модераторы

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

Сообщений: 2290

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

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

2019

Вот попробуйте UDF

:

[vba]

Код

Public Function cc(r As Range, r1 As Range) As String
Dim i&, m, m1, mF()
m = r.Value: m1 = r1.Value
ReDim mF(1 To r.Columns.Count)
For i = 1 To r.Columns.Count: mF(i) = m(1, i) & m1(1, i): Next
cc = Join(mF, Chr(10))
End Function

[/vba]

К сообщению приложен файл: 0990009-1-.xlsm (41.1 Kb)

Иногда все проще чем кажется с первого взгляда.

Сообщение отредактировал SLAVICK - Пятница, 04.09.2015, 18:14

Ответить

Дата: Пятница, 04.09.2015, 18:39 | Сообщение № 14

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

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

Сообщений: 34

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

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

Excel 2010

Открывается секунд за 20. Но зато работает!

А почему длинные строки переносит? Например строку 5 разбивает на несколько:

Материал5|
Двухрежимная арматура 3/6 литров GEBERIT
Дюропластовое сидение, оснащенное механизмом плавного закрывания Microlift
Смыв по всему периметру чаши унитаза
Бесшумное наполнение, нижний подвод воды к бачку

Ответить

Дата: Пятница, 04.09.2015, 19:07 | Сообщение № 15

Группа: Модераторы

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

Сообщений: 2290

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

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

2019

Цитата regnus, 04.09.2015 в 18:39, в сообщении № 14

почему длинные строки переносит?

Потому что у Вас в тексте встречается символ переноса строки

:
Символ(10) - я тоже его в формуле использую для переноса строк на следующую. Детальнее см.Справку по символам.

Иногда все проще чем кажется с первого взгляда.

Ответить

Дата: Среда, 09.09.2015, 18:39 | Сообщение № 16

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

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

Сообщений: 34

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

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

Excel 2010

Спасибо работает, хотя и медленно и через раз вешает нафиг эксель.

5000 строк в 95 колонок загоняет в одну колонку за 20 минут.

2. Как перенести данные в SCV формат?
Сейчас или обрезает данные в ячейках или сохраняет кракозябрами.
[moder]Нарушение п.5q Правил форума. Бан 2 часа. Тема закрыта.[/moder][moder]И обратно открыта для дальнейшего решения первоначального вопроса.

Сообщение отредактировал _Boroda_ - Четверг, 10.09.2015, 07:44

Ответить

Дата: Четверг, 10.09.2015, 13:11 | Сообщение № 17

Группа: Модераторы

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

Сообщений: 2290

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

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

2019

Чтобы работало быстрее нужно делать все "за раз".
Функция просчитывает для каждой строки, перегоняя из диапазона в массив.
Если прописать "заточенный" специально под этот файл макрос - будет работать в сотни раз быстрее

, но не будет такой гибкости выбора диаппазонов.

Иногда все проще чем кажется с первого взгляда.

Ответить

Дата: Четверг, 10.09.2015, 18:04 | Сообщение № 18

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

Ранг: Ветеран

Сообщений: 770

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

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

Excel 2013

regnus, врядли у вас получится добиться быстрой работы на 5000 строк.
У вас в каждую ячейку выводится относительно большой объем информации 5-6 тыс. символов.
На моем железе, на заполнение каждой такой ячейки уходит около 1 сек.
Соответственно, на заполнение 5000 ячеек потребуется около 80 минут.
Проверьте, сколько времени требуется на слияние данных, и сколько на простое заполнение ячеек уже готовыми данными (последняя строка кода).

К сообщению приложен файл: 2485908.xlsm (34.6 Kb)

KSV.VBA@gmail.com
Яндекс.Деньги: 410011921213333

Ответить

Мир MS Excel » Вопросы и решения » Вопросы по Excel » Ко всем ячейкам в столбце прибавить название столбца (Формулы/Formulas)

Страница 1 из 1
1

© 2010-2024 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!