Как транспонировать данные из столбца в одну ячейку в Excel?
Когда вам нужно транспонировать список данных в одну ячейку на листе, обычно вы можете применить функцию Concatenate для объединения списка ячеек в одну ячейку. Однако это может быть сложно, если требуется объединить большой объем данных. В этой статье я расскажу о некоторых быстрых приемах, которые помогут вам решить эту задачу в Excel.
Транспонирование данных из столбца в одну ячейку с помощью пользовательской функции
Транспонирование данных из столбца в одну ячейку с помощью Kutools для Excel
Транспонирование данных из столбца в одну ячейку с помощью пользовательской функции
Помимо функции Concatenate для объединения значений списка ячеек, вы можете применить следующий код VBA, чтобы получить результат максимально быстро.
1. Удерживайте клавиши ALT + F11, и откроется окно Microsoft Visual Basic for Applications.
2. Нажмите Вставить > Модуль и вставьте следующий код в окно Модуля.
VBA код: Транспонирование данных из столбца в одну ячейку
Function transposeRange(Rg As Range)
'updateby Extendoffice
Dim xCell As Range
Dim xStr As String
For Each xCell In Rg
If Not IsEmpty(xCell.Value) Then
xStr = xStr & xCell.Value & ","
End If
Next
transposeRange = Left(xStr, Len(xStr) - 1)
End Function
3. Затем сохраните и закройте этот код, вернитесь на лист и введите эту формулу: =transposerange(A1:A10) в пустую ячейку для вывода результата, затем нажмите клавишу Enter. Вы получите все значения ячеек в столбце, расположенные в одной ячейке, см. скриншот:
Примечание: В приведенном выше коде A1:A10 — это диапазон списка, который вы хотите транспонировать в одну ячейку. Также вы можете разделить объединенное содержимое другими разделителями, такими как запятая, тире, пробел и т.д., просто изменив запятую в строке xStr = xStr & xCell.Value & ",".
Транспонирование данных из столбца в одну ячейку с помощью Kutools для Excel
Если у вас есть Kutools для Excel, с его мощным инструментом «Объединить», вы можете объединить данные в столбце, строке или диапазоне в одну ячейку.
После установки Kutools для Excel выполните следующие действия:
1. Выберите столбец данных, который вы хотите объединить в одну ячейку.
2. Нажмите Kutools > Объединить и Разделить > Объединить строки, столбцы или ячейки без потери данных, см. скриншот:
3. В появившемся диалоговом окне выберите Объединить в одну ячейку в разделе Объединить выбранный диапазон следующим образом, а затем укажите разделитель для разделения объединенного содержимого, см. скриншот:
4. Затем нажмите кнопку ОК или Применить, и вы получите следующий результат, который вам нужен:
 |  |  |
Скачайте и попробуйте Kutools для Excel прямо сейчас бесплатно!
Лучшие инструменты для повышения продуктивности в Office
Повысьте свои навыки работы в Excel с помощью Kutools для Excel и ощутите эффективность на новом уровне. Kutools для Excel предлагает более300 расширенных функций для повышения производительности и экономии времени. Нажмите здесь, чтобы выбрать функцию, которая вам нужнее всего...
Office Tab добавляет вкладки в Office и делает вашу работу намного проще
- Включите режим вкладок для редактирования и чтения в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
- Открывайте и создавайте несколько документов во вкладках одного окна вместо новых отдельных окон.
- Увеличьте свою продуктивность на50% и уменьшите количество щелчков мышью на сотни ежедневно!
Все надстройки Kutools. Один установщик
Пакет Kutools for Office включает надстройки для Excel, Word, Outlook и PowerPoint, а также Office Tab Pro — идеально для команд, работающих в разных приложениях Office.
- Комплексный набор — надстройки для Excel, Word, Outlook и PowerPoint плюс Office Tab Pro
- Один установщик, одна лицензия — настройка занимает считанные минуты (MSI-совместимо)
- Совместная работа — максимальная эффективность между приложениями Office
- 30-дневная полнофункциональная пробная версия — без регистрации и кредитной карты
- Лучшее соотношение цены и качества — экономия по сравнению с покупкой отдельных надстроек