|
楼主 |
发表于 2016-8-25 23:39
|
显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用 · 内置多项VBA编程加强工具 ★ 免费下载 ★ ★ 使用手册★
老师好!还是那个数组乘积求和的问题!主要是寻求VBA中如何来表示的一种格式与方法!类似如下,我随时会增加工序或减少工序,但是代码通过变量控制自动适应,无需手工更改,就像求从1到N的求和,通用N(N+1)/2,无论N数值为多少,此公式结构不会变。多谢了!
工序数 公式随工序数从1到N累加
total = 1 tmp1(c, 12 + total)=(arr(i, 7+1) * FL(1, 2)* brr(i, 2)
total = 2 tmp1(c, 12 + total)=(arr(i, 7+1) * FL(1, 2)* brr(i, 2) + (arr(i, 7+total) * FL(total, 2)* brr(i, 2)
total = 3 tmp1(c, 12 + total)=(arr(i, 7+1) * FL(1, 2)* brr(i, 2) + (arr(i, 7+2) * FL(2, 2)* brr(i, 2) +(arr(i, 7+total) * FL(total, 2)* brr(i, 2)
total = 4 tmp1(c, 12 + total)=(arr(i, 7+1) * FL(1, 2)* brr(i, 2) + (arr(i, 7+2) * FL(2, 2)* brr(i, 2)+(arr(i, 7+3) * FL(3, 2)* brr(i, 2) +(arr(i, 7+total) * FL(total, 2)* brr(i, 2)
total = 5 tmp1(c, 12 + total)=(arr(i, 7+1) * FL(1, 2)* brr(i, 2) + (arr(i, 7+2) * FL(2, 2)* brr(i, 2)+(arr(i, 7+3) * FL(3, 2)*(arr(i, 7+4) * FL(4, 2) brr(i, 2) +(arr(i, 7+total) * FL(total, 2)* brr(i, 2)
当total = N 时 "公式结构是一样的!
就像以下例字累加整数求和"
类似于以下例子:
N=1 X=N(N+1)/2=1
N=2 X=N(N+1)/2=3
N=3 X=N(N+1)/2=6
N=4 X=N(N+1)/2=10
N=5 X=N(N+1)/2=15
N=N X=N(N+1)/2
|
|