内容每5分钟更新
客服QQ:4008017500
客服QQ:4008017500
点击： 回复：1166 关闭此页
通过EXCEL怎么实现双色球所有组合
6楼
杨哥哥儿 | 发表于2019-03-15 14:58:08
杨哥哥儿 | 发表于2019-03-15 14:58:08双色球所有组合为1107568，在2003版本中是无法存储的。只能存储65535行。
VBA代码：
n=2
for i1=1 to 33
for i2=i1+1 to 33
for i3=i2+1 to 33
for i4=i3+1 to 33
for i5=i4+1 to 33
for i6=i5+1 to 33
cells(n,1)=i1
cells(n,2)=i2
cells(n,3)=i3
cells(n,4)=i4
cells(n,5)=i5
cells(n,6)=i6
n=n+1
next:next:next:next:next:next
VBA代码：
n=2
for i1=1 to 33
for i2=i1+1 to 33
for i3=i2+1 to 33
for i4=i3+1 to 33
for i5=i4+1 to 33
for i6=i5+1 to 33
cells(n,1)=i1
cells(n,2)=i2
cells(n,3)=i3
cells(n,4)=i4
cells(n,5)=i5
cells(n,6)=i6
n=n+1
next:next:next:next:next:next
9楼 七月飘雪 | 发表于2019-03-15 15:31:19
杨哥，我是2016版本的。
杨哥，这个求助帖，跟我另一个求助帖的目的基本是一样的。
如果遇到“03 05 08 12 19 22 25 27 29 30 32”这种情况下，应该怎么实现拆分组合呢。
这组数值也不是最终的。只是举了个经典的例子。
辛苦杨哥。
七月飘雪 | 发表于2019-03-15 15:31:19杨哥，我是2016版本的。
杨哥，这个求助帖，跟我另一个求助帖的目的基本是一样的。
如果遇到“03 05 08 12 19 22 25 27 29 30 32”这种情况下，应该怎么实现拆分组合呢。
这组数值也不是最终的。只是举了个经典的例子。
辛苦杨哥。