vba编程,excel中写入vba代码
在excel表格中用vba编一个程序,内容是:由五个限一定范围的数想加等于另一个数,求这个等式有多少种,举例,假设这五个数分别为abcde,a的范围是-1~8,b的范围是...
在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 展开
下面这个程序为什么算出来等于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 展开
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询