给定x + y = 10，Excel可以给我一个可能的x和y列表吗？
任何人都可以帮我解决这个问题吗？ 当然，我有一个更复杂的方程。
谢谢
您可以在VBA中创build一个用户定义的函数，将可能性列为一个string，但是您已经说过您的方程实际上更复杂。
对于你的x + y = 10例子，你可以这样做：
Private Function XYPotentials(i As Integer) As String Dim z As Integer Dim str As String For z = 1 To i - 1 If InStr(str, "(" & z & ", " & i - z & ")") = 0 Then str = str & "(" & z & ", " & i - z & "), " End If Next z XYPotentials = Mid(str, 1, Len(str) - 2) End Function
那么你可以简单地在Excel中使用该函数：
=XYPotentials(10)
这将返回以下string：
（9），（2,8），（3,7），（4,6），（5,5），（6,4），（7,3），（8,2），（9 ，1）
和=XYPotentials(20)将返回：
（1,19），（2,18），（3,17），（4,16），（5,15），（6,14），（7,13），（8,12），（9 ，（10，10），（11,9），（12,8），（13,7），（14,6），（15,5），（16,4），（17,3 ），（18,2），（19,1）