Как транспонировать данные из столбца в одну ячейку в 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 прямо сейчас бесплатно!