如何在 Excel 中列出或生成所有可能的組合？

作者Xiaoyang修改日期2025-04-17

當您在 Excel 中處理資料時，可能會需要從多個清單中產生所有可能的組合。舉例來說，當您擁有兩欄或多欄數值時，手動列出每一種組合不僅耗時費力，還容易出錯，尤其在數值數量增加時更是如此。在本指南中，我們將為您介紹幾種在 Excel 中快速產生所有可能組合的實用方法。

使用公式從兩個清單列出或產生所有可能組合

使用 VBA 程式碼從三個或更多清單列出或產生所有可能組合

使用 Kutools for Excel 從多個清單列出或產生所有可能組合

使用公式從兩個清單列出或產生所有可能組合

下列長公式可協助您快速列出兩個清單數值的所有可能組合，請依照以下步驟操作：

1. 在空白儲存格（例如 D2）中輸入或複製下方公式，然後按下「ENTER 鍵」取得結果，如截圖所示：

=IF(ROW()-ROW($D$2)+1>COUNTA($A$2:$A$5)*COUNTA($B$2:$B$4),"",INDEX($A$2:$A$5,INT((ROW()-ROW($D$2))/COUNTA($B$2:$B$4)+1))&"-"&INDEX($B$2:$B$4,MOD(ROW()-ROW($D$2),COUNTA($B$2:$B$4))+1))

注意：在上述公式中，「$A$2：$A$5」為第一欄數值的範圍，「$B$2：$B$4」為第二個清單數值的範圍（您希望列出其所有可能組合），而「$D$2」是您輸入公式的儲存格，您可以依需求調整這些儲存格參照。

2. 接著選取儲存格 D2，向下拖曳填滿控點，直到出現空白儲存格為止。系統將根據兩個數值清單自動列出所有可能的組合，如截圖所示：

使用 VBA 程式碼從三個或更多清單列出或產生所有可能組合

若上述公式難以套用，尤其在處理多欄資料時，修改起來可能頗具挑戰性；此時，VBA 程式碼能提供更快速且更具彈性的解決方案。

1. 按住「Alt + F11」鍵，即可開啟「Microsoft Visual Basic for Applications」視窗。

2. 點選「插入」>「模組」，並將下列程式碼貼上至「模組」視窗中。

VBA 程式碼：產生 3 欄或多欄的所有組合

Sub ListAllCombinations()
'Updateby Extendoffice
Dim xDRg1, xDRg2, xDRg3 As Range
Dim xRg  As Range
Dim xStr As String
Dim xFN1, xFN2, xFN3 As Integer
Dim xSV1, xSV2, xSV3 As String
Set xDRg1 = Range("A2:A5")  'First column data
Set xDRg2 = Range("B2:B4")  'Second column data
Set xDRg3 = Range("C2:C4")  'Third column data
xStr = "-"   'Separator
Set xRg = Range("E2")  'Output cell
For xFN1 = 1 To xDRg1.Count
    xSV1 = xDRg1.Item(xFN1).Text
    For xFN2 = 1 To xDRg2.Count
        xSV2 = xDRg2.Item(xFN2).Text
      For xFN3 = 1 To xDRg3.Count
        xSV3 = xDRg3.Item(xFN3).Text
        xRg.Value = xSV1 & xStr & xSV2 & xStr & xSV3
        Set xRg = xRg.Offset(1, 0)
       Next
    Next
Next
End Sub

注意：在上述程式碼中，「A2:A5」、「B2:B4」、「C2:C4」是您要使用的數據區域，「E2」是您希望放置結果的輸出儲存格。若您需要取得更多欄位的所有組合，請依需求修改並新增其他參數至程式碼中。

3. 接著按下「F5」鍵執行此程式碼，3 欄的所有組合將立即產生，如截圖所示：

顯示使用 VBA 從三個或更多清單產生的所有可能組合的螢幕截圖

使用 Kutools for Excel 從多個清單列出或產生所有可能組合

當您需要為多個數值清單產生所有可能的組合時，手動修改程式碼可能會相當棘手。此時，我們強烈推薦您使用功能強大的「Kutools for Excel」——其內建的「列出所有組合」功能，能根據您指定的資料清單，快速生成所有可能的組合！

Kutools for Excel 提供超過 300 項進階功能，簡化複雜作業，提升創造力與效率。整合 AI 功能，Kutools 能精準自動化各項任務，讓資料管理輕鬆無負擔。Kutools for Excel 的詳細資訊…… 免費試用……

1. 點選「Kutools」>「插入」>「列出所有組合」，如截圖所示：

2. 在「列出所有組合」對話方塊中，依照下方示範進行操作：

3. 此時所有指定的數值與分隔符號都已列於對話方塊中，如截圖所示：

顯示對話框中列出的指定值與分隔符號的螢幕截圖

4. 接著點選「確定」按鈕，系統會彈出提示方塊，提醒您選取一個儲存格來輸出結果，如截圖所示：

提示選取組合輸出儲存格的螢幕截圖

5. 點選「確定」後，所有基於指定清單的可能組合便會產生至工作表中，如下方截圖所示：

顯示從三個或更多清單產生的所有可能組合的螢幕截圖

Kutools for Excel－透過超過 300 項必備工具全面強化 Excel，讓您的工作更快速、更輕鬆，並運用 AI 功能實現更聰明的資料處理與高效生產力！立即取得

最佳 Office 生產力工具

🤖	KUTOOLS AI 助手：基於以下內容徹底革新數據分析：智慧執行｜產生程式碼｜建立自訂公式｜分析資料並產生圖表｜呼叫增強函數……
	熱門功能：尋找、醒目提示或標記重複值｜刪除空白行｜合併列或儲存格而不遺失資料｜不使用公式的四捨五入……
	高級 LOOKUP：多重條件 VLookup ｜多重數值 VLookup ｜跨多個工作表 VLookup ｜模糊查找……
	高級下拉列表：快速建立下拉式清單｜相依式下拉式清單｜多選下拉式清單……
	欄位管理員：新增指定數量的欄位｜移動欄位｜切換隱藏欄位的可見狀態｜比較範圍與欄位……
	精選功能：網格聚焦｜設計視圖｜增強編輯欄｜工作簿與工作表管理員｜資源庫（自動文字）｜日期提取｜合併工作表｜加密／解密儲存格｜依清單傳送電子郵件｜超級篩選｜特殊篩選（篩選粗體儲存格／斜體／刪除線……） ......
	頂尖 15 工具組：12 文字工具（添加文本，刪除特定字符，……）｜ 50+ 圖表類型（甘特圖，……）｜ 40+ 實用公式（基於生日計算年齡，……）｜ 19 插入工具（插入二維碼，從路徑插入圖片，……）｜ 12 轉換工具（金額轉大寫，匯率轉換，……）｜ 7 合併和拆分工具（高級合併行，分割儲存格，……）｜……以及更多