0－9这10个数任选五个（可重复）,和值为30,能有多少个组合?要公式,和值会变.是0－9这十个数字都得有，你这里面没有0啊？能再给我重发一个吗？

Question

0－9这10个数任选五个（可重复）,和值为30,能有多少个组合?要公式,和值会变.
是0－9这十个数字都得有，你这里面没有0啊？能再给我重发一个吗？

Answer 1

共57种VBA代码如下：Public Sub a1()Dim a1,a2,a3,a4,a5,a6 As IntegerFor a1 = 1 To 9For a2 = a1 To 9For a3 = a2 To 9For a4 = a3 To 9For a5 = a4 To 9If a1 + a2 + a3 + a4 + a5 = 30 ThenRange("a1").SelectIf...