如何在Excel中列出或生成所有可能的组合?
假设我有以下两列数据,现在,我想基于两个值列表生成所有可能组合的列表,如左图所示。 也许,如果值很少,则可以一一列出所有组合,但是,如果有几列需要列出多个值,可能的组合就可以通过下面的一些快速技巧来解决。 。
用公式列出或生成两个列表中的所有可能组合
下面的长公式可以帮助您快速列出两个列表值的所有可能组合,请执行以下操作:
1。 将以下公式输入或复制到空白单元格中,在这种情况下,我将其输入到单元格D2中,然后按 输入 获得结果的关键,请参见屏幕截图:
2。 然后选择单元格D2,并将填充手柄向下拖动到单元格,直到获得空白单元格,并且所有可能的组合均已基于两个列表值列出。 看截图:
使用VBA代码列出或生成来自三个或更多列表的所有可能组合
也许上面的公式对您来说很难应用,如果有多列数据,则修改起来很麻烦。 在这里,我将介绍一个VBA代码来快速处理它。
1。 按住 ALT + F11 键打开 Microsoft Visual Basic应用程序 窗口。
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
3。 然后,按 F5 键来运行此代码,并且将立即生成3列的所有组合,请参见屏幕截图:
列出或生成具有强大功能的多个列表中的所有可能组合
如果有多个列表值需要列出可能的组合,则可能很难修改代码。 在这里,我可以推荐一个功能强大的工具- Kutools for Excel,它包含一个方便的功能 列出所有组合 可以根据给定的数据列表快速列出所有可能的组合。
安装后 Kutools for Excel,请这样做:
1. 点击 库工具 > 插页 > 列出所有组合,请参见屏幕截图:
2。 在 列出所有组合 对话框中,进行如下所示的演示操作:
3。 然后,所有指定的值和分隔符都已列在对话框中,请参见屏幕截图:
4然后单击 Ok 按钮,然后会弹出一个提示框,提醒您选择一个单元格以输出结果,请参见屏幕截图:
5。 点击 OK,基于给定列表的所有可能组合已生成到工作表中,如以下屏幕截图所示:
更多相关文章:
- 生成3列或多列的所有组合
- 假设我有3列数据,现在,我想在这3列中生成或列出数据的所有组合,如下图所示。 您有什么好的方法可以在Excel中解决此任务?
- 查找等于给定总和的所有组合
- 例如,我有以下数字列表,现在,我想知道列表中的数字组合总计为480,在下面的屏幕截图中,您可以看到有五组可能的组合加起来等于到480,例如300 + 60 + 120、300 + 60 + 40 + 80等。本文,我将讨论一些方法来查找哪些单元格在Excel中求和成特定值。
- 生成或列出所有可能的排列
- 例如,我有三个字符XYZ,现在,我想基于这三个字符列出所有可能的排列,以获得六个不同的结果,例如:XYZ,XZY,YXZ,YZX,ZXY和ZYX。 在Excel中,如何根据不同的字符数快速生成或列出所有排列?
- 生成所有可能的4位数字组合的列表
- 在某些情况下,我们可能需要生成一个由4到0的所有可能的9位数字组成的列表,这意味着要生成一个0000、0001、0002…9999的列表。 为了快速解决Excel中的列表任务,我为您介绍了一些技巧。
最佳办公生产力工具
🤖 | Kutools 人工智能助手:基于以下内容彻底改变数据分析: 智能执行 | 生成代码 | 创建自定义公式 | 分析数据并生成图表 | 调用 Kutools 函数... |
热门特色: 查找、突出显示或识别重复项 | 删除空白行 | 合并列或单元格而不丢失数据 | 不使用公式进行四舍五入 ... | |
超级查询: 多条件VLookup | 多值VLookup | 跨多个工作表的 VLookup | 模糊查询 .... | |
高级下拉列表: 快速创建下拉列表 | 依赖下拉列表 | 多选下拉列表 .... | |
列管理器: 添加特定数量的列 | 移动列 | 切换隐藏列的可见性状态 | 比较范围和列 ... | |
特色功能: 网格焦点 | 设计图 | 大方程式酒吧 | 工作簿和工作表管理器 | 资源库 (自动文本) | 日期选择器 | 合并工作表 | 加密/解密单元格 | 按列表发送电子邮件 | 超级筛选 | 特殊过滤器 (过滤粗体/斜体/删除线...)... | |
前 15 个工具集: 12 文本 工具 (添加文本, 删除字符,...) | 50+ 图表 类型 (甘特图,...) | 40+ 实用 公式 (根据生日计算年龄,...) | 19 插入 工具 (插入二维码, 从路径插入图片,...) | 12 转化 工具 (小写金额转大写, 货币兑换,...) | 7 合并与拆分 工具 (高级组合行, 分裂细胞,...) | ... 和更多 |
使用 Kutools for Excel 增强您的 Excel 技能,体验前所未有的效率。 Kutools for Excel 提供了 300 多种高级功能来提高生产力并节省时间。 单击此处获取您最需要的功能...
Office Tab 为 Office 带来选项卡式界面,让您的工作更加轻松
- 在Word,Excel,PowerPoint中启用选项卡式编辑和阅读,发布者,Access,Visio和Project。
- 在同一窗口的新选项卡中而不是在新窗口中打开并创建多个文档。
- 每天将您的工作效率提高50%,并减少数百次鼠标单击!