在excel表格中用vba编一个程序,内容是:由五个限一定范围的数想加等于另一个数,求这个等式有多少种,举例,假设这五个数分别为abcde ,a的范围是-1~8,b的范围是-7~2,c的范围是-2~7,d的范围是-1~8,e的范围是-7~2,现在a+b+c+d+e=7 ,列出满足这个要求的所有等式。如,1+1+1+1+3,1+1+2+2+1...,谢谢。
下面这个程序为什么算出来等于false 没有基础求解答,或者重新写个代码,谢谢了。
Sub 宏1()
k = 1
For a = -1 To 8
For b = -7 To 2
For c = -2 To 7
For d = -1 To 8
For e = -7 To 2
If a + b + c + d + e = 7 Then
Cells(k, 1) = a & " + " & b & " + " & c & " + " & d & " + " & e & " = 7"
k = k + 1
End If
Next e, d, c, b, a
End Sub
你好,我是wps sub前后需要加什么吗
追答WPS和office使用方法是一样的
你可以试试加变量声明
追问那我怎么用sub算不出来,额
追答发个动图看看
追问额,手机发不了,我就感觉第一行 sub宏1 有问题
追答我电脑也关了
追问我知道原因了,谢谢了!