如何在 Excel 中將列清單轉換為逗號分隔的清單？

在 Excel 中，CONCATENATE 函數可以將列清單轉換為以逗號分隔的單一儲存格清單。請按照以下步驟操作：

1. 選擇與列表第一個數據相鄰的空白儲存格，例如 C1，然後輸入此公式：

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

2. 在公式中高亮顯示 TRANSPOSE(A1:A7)&","，然後按 “F9” 鍵。

3. 從公式中刪除大括號 “{“ 和 “}”，然後按 “Enter” 鍵。

現在，您可以看見列清單中的所有值已轉換為單一儲存格中的清單，並且以逗號分隔。請參見上面的截圖。

使用 Kutools for Excel 快速將列清單轉換為逗號分隔的清單

Kutools for 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. 點擊 “確定”，然後另一個對話框彈出讓您選擇一個儲存格。請參見截圖：

6. 點擊 “確定”，列清單中的所有值都已轉換為單一儲存格中的逗號分隔清單。

提示：在上述 VBA 中，“,” 表示您想要的分隔符，您可以根據需求進行修改。

您也可以應用 Kutools for Excel 的「合併」功能來合併列清單，並輕鬆地用逗號分隔每個值。

1. 選擇要轉換為逗號分隔清單的列清單，然後點擊 “Kutools” > “合併與分割” > “合併行/列/儲存格並保留值”。

2. 在打開的「合併列」對話框中，您需要：
(1) 在「根據以下選項合併所選儲存格」部分中勾選「合併行」選項；
(2) 在「指定分隔符」部分中勾選「其他分隔符」選項，並輸入逗號 “, ”；

3. 點擊 「確定」 按鈕。

現在，您將看到指定列清單中的所有值都被合併到一個儲存格中，並轉換為逗號分隔的清單。

反向合併並將一個儲存格（逗號分隔的清單）轉換為行/列清單

通常，Excel 使用者可以應用「文字轉欄」功能將一個儲存格拆分為多個列，但沒有直接的方法將一個儲存格轉換為多行。然而，Kutools for Excel 的「分割儲存格」功能可以幫助您輕鬆完成這一操作，如下方截圖所示。