Как преобразовать список столбцов в список, разделенный запятыми, в Excel?

В Excel функция CONCATENATE может преобразовать список столбцов в список в ячейке, разделенный запятыми. Пожалуйста, выполните следующие действия:

1. Выберите пустую ячейку рядом с первыми данными списка, например, ячейку C1, и введите эту формулу:

=CONCATENATE(TRANSPOSE(A1:A7)&",")

2. Выделите TRANSPOSE(A1:A7)&"," в формуле и нажмите клавишу "F9".

3. Удалите фигурные скобки "{" и "}" из формулы и нажмите клавишу "Enter".

Теперь вы можете видеть, что все значения в списке столбцов преобразованы в список в ячейке, разделенный запятыми. См. скриншот выше.

Быстро преобразуйте список столбцов в список, разделенный запятыми, с помощью Kutools для Excel

Утилита "Объединить строки или столбцы без потери данных" Kutools для Excel может помочь пользователям Excel легко объединить несколько столбцов или строк в один столбец/строку без потери данных. Кроме того, пользователи Excel могут обернуть эти объединенные текстовые строки с переносом строки или жестким возвратом каретки.

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

1. Удерживайте кнопку "ALT" и нажмите "F11" на клавиатуре, чтобы открыть окно "Microsoft Visual Basic for Applications".

2. Нажмите "Вставка" > "Модуль" и скопируйте VBA-код в модуль.

VBA: Преобразование списка столбцов в список, разделенный запятыми

Sub ChangeRange()
'Updateby20140310
Dim rng As Range
Dim InputRng As Range, OutRng As Range
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Range :", xTitleId, InputRng.Address, Type:=8)
Set OutRng = Application.InputBox("Out put to (single cell):", xTitleId, Type:=8)
outStr = ""
For Each rng In InputRng
    If outStr = "" Then
        outStr = rng.Value
    Else
        outStr = outStr & "," & rng.Value
    End If
Next
OutRng.Value = outStr
End Sub

3. Нажмите кнопку "Запуск" или клавишу "F5", чтобы запустить VBA.

4. На экране появится диалоговое окно, и вы сможете выбрать список столбцов, который хотите преобразовать. См. скриншот:

5. Нажмите "OK", затем появится еще одно диалоговое окно, где вы сможете выбрать ячейку. См. скриншот:

6. Нажмите "OK", и все значения в списке столбцов будут преобразованы в список, разделенный запятыми, в ячейке.

Совет: В приведенном выше VBA-коде "," указывает разделитель, который вы хотите использовать, и вы можете изменить его в соответствии с вашими требованиями.

Вы также можете применить утилиту "Объединить" Kutools для Excel, чтобы объединить список столбцов и легко разделить каждое значение запятой.

1. Выберите список столбцов, который вы хотите преобразовать в список, разделенный запятыми, и нажмите "Kutools" > "Объединить и Разделить" > "Объединить строки, столбцы или ячейки без потери данных".

2. В открывшемся диалоговом окне "Объединить столбцы или строки" вам необходимо:
(1) Проверьте опцию "Объединить строки" в разделе "Объединить выбранный диапазон следующим образом";
(2) В разделе "Указать разделитель" проверьте опцию "Другой разделитель", и введите запятую ", ";

3. Нажмите кнопку "ОК".

Теперь вы увидите, что все значения в указанном списке столбцов объединены в одну ячейку и преобразованы в список, разделенный запятыми.

Обратное объединение и преобразование одной ячейки (списка, разделенного запятыми) в список строк/столбцов в Excel

Обычно пользователи Excel могут применять функцию "Текст по столбцам", чтобы разделить одну ячейку на несколько столбцов, но нет прямого способа преобразовать одну ячейку в несколько строк. Однако утилита "Разделить ячейки" Kutools для Excel может помочь вам легко сделать это, как показано на скриншоте ниже.