如何快速利用mod函数产生想要的循环等差序列

zaoyan

在论坛求教，发现有些复杂的公式里要用循环的等差数列，一开始看得晕晕不知道人家是怎么设计出来的，后来发现规律啦，发出来分享一下。希望大家不要笑我火星=。。=

首先要知道等差数列如何生成：
我们知道，等差数列的公式是
an=a1+（n-1）*d
其中An为等差数列第n项
a1为数列第一项（是已知的）
d为等差数列的公差（已知）
an=a1+n*d-d=d*n+(a1-d)
如果希望公式是向下拉产生数列，那么用函数row(1:1)代入n；
如果向右拉产生数列，那么用函数column(a:a)代入n；

如果序列需要循环，就要用到mod函数
语法: =Mod(number,divisor)  number是被除数,divisor是除数
假设所要的循环体长度是L
参数number应该代入上面的等差数列的公式参数divisor应为公差d*L

综上所述，产生一个循环等差数列的公式应该为
=mod(d*row(1:1)+(a1-d),d*L)
或者
=mod(d*column(A:A)+(a1-d),d*L)

举例：产生一个2,5,8,11,2,5,8,11……的序列
a1=2,d=3,m=4
公式为：=mod(3*row(1:1)+(2-3),3*4)=mod(3*row(1:1)-1,12)

完毕 请大虾们不要笑我白痴=。。= 跑

[ 本帖最后由 zaoyan 于 2010-11-23 21:43 编辑 ]

honggexjq

为什么要笑你白痴呢，一般用的时候很少考虑这种数学的东西，现在经你一总结思路更清晰了，应该谢谢你才是

www9009

我也学一下，这个等差公式
=mod(d*row(1:1)+(a1-d),d*L)
或者
=mod(d*column(A:A)+(a1-d),d*L)

wlaish

谢谢楼主，我觉得很不错，我每次用的时候在那算半天，呵呵

aqi0611

参数number应该代入上面的等差数列的公式,参数divisor应为公差d*L...
我不是很懂为什么number被除数直接就可以是an的公式了呢？就是我推导不出来number被除数与an这条公式的代入关系，求解答详细点可以吗大神！

aqi0611

我把大神的公式最终整理了一下，=MOD(d*COLUMN(A:A)-a1,d*L)+a1 / MOD(d*ROW(1:1)-a1,d*L)+a1

生成不管公差是几都可以用这条公式了。

aqi0611

当然我也是在各位大神之前的总结下再归纳总结一下的哈。感谢各位大神给我的提示与指点！

aqi0611

更正：column函数后不是减去a1，而是应该减去d哈。
我把大神的公式最终整理了一下，=MOD(d*COLUMN(A:A)-d,d*L)+a1 / MOD(d*ROW(1:1)-d,d*L)+a1

生成不管公差是几都可以用这条公式了。

求各位大神指导

zjl532527

Sub dcsl()
For i = 1 To 10
For j = 1 To 10
Sheet1.Cells(j, 1) = i
i = i + 2
Next
Next
End Sub

caixixin

Sub dcsl()
For i = 1 To 100

Cells(i, 1) = 2 * i - 1

Next

End Sub