提示:其它语言是由 Google 机器翻译的。 你可以访问 English 版本。
登录
x
or
x
x
马上登记
x

or

如何在Excel中的列表中查找两个数字的所有可能总和?

假设这里是一个数字列表,现在您可以在此列表中找到两个数字的所有可能总和,如下面的屏幕截图所示? 在Excel中,没有内置函数可以解决这个问题。 现在我向您介绍一个VBA代码来处理它。
doc所有可能的两个数字1的总和

Find all possible sums of two numbers in a list with VBA code

Find all possible combinations of two lists with List All Combinations好idea3


List all combinations of two or more lists in Excel sheet

例如,你有两个值列表,你想要的是将这两个列表结合起来,得到所有可能的组合,如下图所示。 一般来说,你可以把它们一一合并,但是如果有几十个值需要合并,这个手工方法花费很多时间。 在这种情况下,您可以尝试申请 Kutools for Excel's List All Combinations 实用程序,可以快速生成您需要的两个或多个列表的所有组合。 Click for 60 days free trial!
doc列表组合
Kutools for Excel: with more than 200 handy Excel add-ins, free to try with no limitation in 60 days.

Find all possible sums of two numbers in a list with VBA code

如果要在列表中查找两个数字的所有可能总和,可以应用以下VBA代码。

1。 按 Alt + F11 键显示 Microsoft Visual Basic for Applications 窗口。

2。 点击 Insert > Module,将代码复制并粘贴到模块中。

VBA: List all possible sums of two numbers in a list

Sub Combinations()
'UpdatebyExtendoffice20180628
    Dim xRgArr
    Dim xNum As Long
    Dim I, J, K As Long
    Dim xTemp As Double
    Dim xRg As Range
    Dim xRgCount As Long
    Dim xDic As New Dictionary
    On Error Resume Next
    Set xRg = Application.InputBox("Select a list (one column):", "KuTools for Excel", Selection.Address, , , , , 8)
    If (xRg Is Nothing) Or (xRg.Count = 1) Then Exit Sub
    xRgCount = xRg.Count
    K = 1
    ReDim xRgArr(1 To xRgCount)
    For Each xCell In xRg
      xRgArr(K) = xCell.Value
      K = K + 1
    Next
    K = 0
    For I = 1 To xRgCount
        For J = I + 1 To xRgCount
            xTemp = xRgArr(I) + xRgArr(J)
            If Not xDic.Exists(xTemp) Then
                xDic.Add CDbl(xTemp), CStr(xTemp)
                K = K + 1
            End If
        Next
    Next
    Range("C1").Resize(xDic.Count, 1) = Application.WorksheetFunction.Transpose(xDic.Keys)
End Sub

doc所有可能的两个数字2的总和

3。 点击 Tools > References,在弹出的对话框中检查 Microsoft Scripting Runtime 复选框。

doc所有可能的两个数字3的总和 doc右箭头 doc所有可能的两个数字4的总和

4。 点击 OK 关闭对话框,然后按 F5 要运行代码,会弹出一个对话框,提醒您选择列表以查找可能的总和。
doc所有可能的两个数字5的总和

5。 点击 OK,然后列表中列出了列表中两个数字的所有可能总和。
doc所有可能的两个数字6的总和

Tip:在代码字符串中,Range(“C1”)。Resize(xDic.Count,1),您可以在需要放置结果时将C1更改为另一个单元格。


Find all possible combinations of two lists with List All Combinations

如果您想查找或列出两个列表的所有可能组合,如下面的屏幕截图所示, List All Combinations 实用程序 Kutools for Excel 可以帮你一个忙。
doc所有可能的两个数字7的总和

1。 点击 Kutools > Insert > List All Combinations.
doc所有可能的两个数字8的总和

2。 在里面 List All Combinations 单击对话框,单击选择按钮以选择要合并的第一个列表。
doc所有可能的两个数字9的总和

3。 点击 Add 将列表添加到 Combinations list 部分。
doc所有可能的两个数字10的总和

4。 重复步骤2和3将第二个列表添加到 Combinations list.
doc所有可能的两个数字11的总和

5。 然后点击 Ok 选择一个单元格来放置组合结果。
doc所有可能的两个数字12的总和

6。 点击 OK。 所有可能的组合都列在单元​​格中。
doc所有可能的两个数字13的总和

Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.