Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

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

 

= Мир MS Excel/Конкатенация массива данных - Мир MS Excel

Регистрация · Логин: · Пароль: · · Забыли пароль?
  • Страница 1 из 1
  • 1
Модератор форума: _Boroda_, Manyasha, SLAVICK, китин  
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Конкатенация массива данных (Формулы/Formulas)
Конкатенация массива данных
EVS Дата: Среда, 15.01.2020, 13:22 | Сообщение № 1
Группа: Пользователи
Ранг: Прохожий
Сообщений: 4
Репутация: 0 ±
Замечаний: 0% ±

Excel 2016
Здравствуйте, товарищи!
Подскажите, пожалуйста, мне надо объединять в одной ячейке информацию из множества ячеек в строке.
Работаю в версии 2016, винда 7.
Заранее спасибо.
 
Ответить
СообщениеЗдравствуйте, товарищи!
Подскажите, пожалуйста, мне надо объединять в одной ячейке информацию из множества ячеек в строке.
Работаю в версии 2016, винда 7.
Заранее спасибо.

Автор - EVS
Дата добавления - 15.01.2020 в 13:22
Serge_007 Дата: Среда, 15.01.2020, 13:29 | Сообщение № 2
Группа: Админы
Ранг: Местный житель
Сообщений: 13305
Репутация: ±
Замечаний: ±

Excel 2010
Здравствуйте

Макрос Павлова:
[vba]
Код
Sub MergeToOneCell()
    Const sDELIM As String = " "     'символ-разделитель
    Dim rCell As Range
    Dim sMergeStr As String
    If TypeName(Selection) <> "Range" Then Exit Sub   'если выделены не ячейки - выходим
    With Selection
        For Each rCell In .Cells
            sMergeStr = sMergeStr & sDELIM & rCell.Text  'собираем текст из ячеек
        Next rCell
        Application.DisplayAlerts = False   'отключаем стандартное предупреждение о потере текста
        .Merge Across:=False                'объединяем ячейки
        Application.DisplayAlerts = True
        .Item(1).Value = Mid(sMergeStr, 1 + Len(sDELIM))    'добавляем к объед.ячейке суммарный текст
    End With
End Sub
[/vba]


Яндекс-деньги:41001419691823 | WMR:126292472390
 
Ответить
СообщениеЗдравствуйте

Макрос Павлова:
[vba]
Код
Sub MergeToOneCell()
    Const sDELIM As String = " "     'символ-разделитель
    Dim rCell As Range
    Dim sMergeStr As String
    If TypeName(Selection) <> "Range" Then Exit Sub   'если выделены не ячейки - выходим
    With Selection
        For Each rCell In .Cells
            sMergeStr = sMergeStr & sDELIM & rCell.Text  'собираем текст из ячеек
        Next rCell
        Application.DisplayAlerts = False   'отключаем стандартное предупреждение о потере текста
        .Merge Across:=False                'объединяем ячейки
        Application.DisplayAlerts = True
        .Item(1).Value = Mid(sMergeStr, 1 + Len(sDELIM))    'добавляем к объед.ячейке суммарный текст
    End With
End Sub
[/vba]

Автор - Serge_007
Дата добавления - 15.01.2020 в 13:29
китин Дата: Среда, 15.01.2020, 13:30 | Сообщение № 3
Группа: Модераторы
Ранг: Экселист
Сообщений: 6279
Репутация: 963 ±
Замечаний: 0% ±

Excel 2007;Excel 2010
мне надо объединять в одной ячейке информацию из множества ячеек в строке

переведите.
если просто надо все ячейки записать в одну, то используйте СЦЕПИТЬ
точнее при наличии файла примера


Не судите строго:я пытаюсь научиться
ЯД 41001877306852/WM R249698041931; Z239672726538
 
Ответить
Сообщение
мне надо объединять в одной ячейке информацию из множества ячеек в строке

переведите.
если просто надо все ячейки записать в одну, то используйте СЦЕПИТЬ
точнее при наличии файла примера

Автор - китин
Дата добавления - 15.01.2020 в 13:30
Serge_007 Дата: Среда, 15.01.2020, 13:32 | Сообщение № 4
Группа: Админы
Ранг: Местный житель
Сообщений: 13305
Репутация: ±
Замечаний: ±

Excel 2010
Начиная с Excel 2019:
Цитата
Функция ОБЪЕДИНИТЬ

В Excel 2019 появилась еще одна функция, которая умеет соединять текстовые строки. Она является усовершенствованной версией функции СЦЕП. В нее добавлена возможность задавать разделитель (1-ый аргумент) и указывать ей, как обрабатывать пустые ячейки (2-ой аргумент). Например, формула

Код
=ОБЪЕДИНИТЬ(", ";ИСТИНА;A2:A10)


соединит ячейки диапазона A2:A10, проставив после каждой запятую и пробел, но при этом пустые ячейки будут пропущены. Если заменить ИСТИНА на ЛОЖЬ, то пустые ячейки также буду учтены и отделены от других частей текста указанным в первом аргументе разделителем.


Яндекс-деньги:41001419691823 | WMR:126292472390
 
Ответить
СообщениеНачиная с Excel 2019:
Цитата
Функция ОБЪЕДИНИТЬ

В Excel 2019 появилась еще одна функция, которая умеет соединять текстовые строки. Она является усовершенствованной версией функции СЦЕП. В нее добавлена возможность задавать разделитель (1-ый аргумент) и указывать ей, как обрабатывать пустые ячейки (2-ой аргумент). Например, формула

Код
=ОБЪЕДИНИТЬ(", ";ИСТИНА;A2:A10)


соединит ячейки диапазона A2:A10, проставив после каждой запятую и пробел, но при этом пустые ячейки будут пропущены. Если заменить ИСТИНА на ЛОЖЬ, то пустые ячейки также буду учтены и отделены от других частей текста указанным в первом аргументе разделителем.

Автор - Serge_007
Дата добавления - 15.01.2020 в 13:32
Serge_007 Дата: Среда, 15.01.2020, 13:44 | Сообщение № 5
Группа: Админы
Ранг: Местный житель
Сообщений: 13305
Репутация: ±
Замечаний: ±

Excel 2010
используйте СЦЕПИТЬ
Игорь, много ячеек надо сцепить, массив :)


Яндекс-деньги:41001419691823 | WMR:126292472390
 
Ответить
Сообщение
используйте СЦЕПИТЬ
Игорь, много ячеек надо сцепить, массив :)

Автор - Serge_007
Дата добавления - 15.01.2020 в 13:44
Pelena Дата: Среда, 15.01.2020, 13:54 | Сообщение № 6
Группа: Админы
Ранг: Местный житель
Сообщений: 16512
Репутация: 3568 ±
Замечаний: ±

Excel 2010, 2016 & Mac Excel
Ещё варианты пользовательскими функциями здесь
точнее при наличии файла примера


"Черт возьми, Холмс! Но как??!!"
ЯД 41001765434816
 
Ответить
СообщениеЕщё варианты пользовательскими функциями здесь
точнее при наличии файла примера

Автор - Pelena
Дата добавления - 15.01.2020 в 13:54
китин Дата: Среда, 15.01.2020, 14:14 | Сообщение № 7
Группа: Модераторы
Ранг: Экселист
Сообщений: 6279
Репутация: 963 ±
Замечаний: 0% ±

Excel 2007;Excel 2010
много ячеек надо сцепить

ха ха откуда инфа? файла то нетути!!! :p


Не судите строго:я пытаюсь научиться
ЯД 41001877306852/WM R249698041931; Z239672726538
 
Ответить
Сообщение
много ячеек надо сцепить

ха ха откуда инфа? файла то нетути!!! :p

Автор - китин
Дата добавления - 15.01.2020 в 14:14
Serge_007 Дата: Среда, 15.01.2020, 14:19 | Сообщение № 8
Группа: Админы
Ранг: Местный житель
Сообщений: 13305
Репутация: ±
Замечаний: ±

Excel 2010
откуда инфа? файла то нетути
В данном случае файл не нужен, все понятно из названия темы :D


Яндекс-деньги:41001419691823 | WMR:126292472390
 
Ответить
Сообщение
откуда инфа? файла то нетути
В данном случае файл не нужен, все понятно из названия темы :D

Автор - Serge_007
Дата добавления - 15.01.2020 в 14:19
EVS Дата: Среда, 15.01.2020, 18:42 | Сообщение № 9
Группа: Пользователи
Ранг: Прохожий
Сообщений: 4
Репутация: 0 ±
Замечаний: 0% ±

Excel 2016
Излишнее цитирование удалено администрацией - это нарушение п.5j Правил форума
Serge_007,

а есть инструкция как это делать? а то в интернете всего полно... а я совсем профан... глаза разбегаются...


Сообщение отредактировал китин - Четверг, 16.01.2020, 10:06
 
Ответить
СообщениеИзлишнее цитирование удалено администрацией - это нарушение п.5j Правил форума
Serge_007,

а есть инструкция как это делать? а то в интернете всего полно... а я совсем профан... глаза разбегаются...

Автор - EVS
Дата добавления - 15.01.2020 в 18:42
EVS Дата: Среда, 15.01.2020, 18:44 | Сообщение № 10
Группа: Пользователи
Ранг: Прохожий
Сообщений: 4
Репутация: 0 ±
Замечаний: 0% ±

Excel 2016
Serge_007,
на 16 работает, только если подписку купить(
 
Ответить
СообщениеSerge_007,
на 16 работает, только если подписку купить(

Автор - EVS
Дата добавления - 15.01.2020 в 18:44
Serge_007 Дата: Четверг, 16.01.2020, 09:33 | Сообщение № 11
Группа: Админы
Ранг: Местный житель
Сообщений: 13305
Репутация: ±
Замечаний: ±

Excel 2010
Ещё варианты пользовательскими функциями здесь
Пройдите по ссылке, там файл есть готовый


Яндекс-деньги:41001419691823 | WMR:126292472390
 
Ответить
Сообщение
Ещё варианты пользовательскими функциями здесь
Пройдите по ссылке, там файл есть готовый

Автор - Serge_007
Дата добавления - 16.01.2020 в 09:33
EVS Дата: Вторник, 18.02.2020, 14:30 | Сообщение № 12
Группа: Пользователи
Ранг: Прохожий
Сообщений: 4
Репутация: 0 ±
Замечаний: 0% ±

Excel 2016
Спасибо, товарищи!!! Очень помогли. Всех благ Вам!!
 
Ответить
СообщениеСпасибо, товарищи!!! Очень помогли. Всех благ Вам!!

Автор - EVS
Дата добавления - 18.02.2020 в 14:30
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Конкатенация массива данных (Формулы/Formulas)
  • Страница 1 из 1
  • 1
Поиск:

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