Office中国论坛/Access中国论坛

标题: 哪位高手有制作万能6红的制作方法？ [打印本页]

作者: jydodo 时间: 2008-11-6 22:23
标题: 哪位高手有制作万能6红的制作方法？
哪位高手有制作万能6红的制作方法？

面对几十注号码，哪们高手有制作万能6红（5或7红）的制作方法？即只要填入几十注号码，就能自动显示万能6红（5或7红）盼回复，谢谢。

例如下图：2008102到126期开奖号码中最少开出万能6红（1、9、10、14、24、32）中的至少1个号码。
但1、9、10、14、24、32是通过人工选择出来的，非常耗时，如能设计某些公式，在图表中填入开将号码，就能自动计算出万能码是哪几个。
希望得到帮助、回复，如有能通过excel设计者，愿高价支付报酬，谢谢

期号       开奖号码                                              万能6红
2008102       3       7       12       21       25       32       1       9       10       14       24       32
2008103       1    12       16       18       22       33    1       9       10       14       24       32
2008104       3       6       8       17       24       31       1       9       10       14       24       32
2008105       5       17       19       27       28       32       1       9       10       14       24       32
2008106       14       19       25       27       29       30       1       9       10       14       24       32
2008107       6       13       18       22       27       32       1       9       10       14       24       32
2008108       9       10       15       17       23       30       1       9       10       14       24       32
2008109       4       7       9       16       21       28       1       9       10       14       24       32
2008110       10       16       22       23       29       31       1       9       10       14       24       32
2008111       17       18       21       25       31       32       1       9       10       14       24       32
2008112       5       13       14       19       22       23       1       9       10       14       24       32
2008113       6       9       10       12       17       22       1       9       10       14       24       32
2008114       4       9       20       24       25       31       1       9       10       14       24       32
2008115       2       12       13       14       17       18       1       9       10       14       24       32
2008116       3       7       21       22       24       29       1       9       10       14       24       32
2008117       3       5       7       10       14       33       1       9       10       14       24       32
2008118       4       9       16       27       31       33       1       9       10       14       24       32
2008119       5       7       9       15       24       29       1       9       10       14       24       32
2008120       10       11       22       24       26       33       1       9       10       14       24       32
2008121       2       22       23       27       31       32       1       9       10       14       24       32
2008122       2       8       11       14       19       26       1       9       10       14       24       32
2008123       10       11       15       16       25       29       1       9       10       14       24       32
2008124       1       7       10       13       21       22       1       9       10       14       24       32
2008125       10       11       12       15       26       29       1       9       10       14       24       32
2008126       4       11       12       14       20       30       1       9       10       14       24       32

作者: pureshadow 时间: 2008-11-6 23:31
这题没那么复杂，楼主用不着付银子。
用条件格式就可以了。
另外，同样内容的贴子不要重复发，另两个删除了。

作者: tmtony 时间: 2008-11-7 00:59
能妖!

作者: liwen 时间: 2008-11-7 10:28
妖的条件格式好象不正确喔，并且楼主要求的是要如何自动计算出万能码如（1、9、10、14、24、32）

作者: pureshadow 时间: 2008-11-7 11:51
不懂什么叫万能码，根据什么规律来算的[:30]

作者: liwen 时间: 2008-11-7 15:13
我估计就是对于每一期的号码中，在万能码中总能找到至少一个与之对应，也就是6个码能中一个就行，放宽点就是万能7码中有一个能中就行 [:41]

作者: 刘志文 时间: 2008-11-7 16:18
COUNTIF可求！！[:50] [:50]

作者: jydodo 时间: 2008-11-7 19:27
万能号码就是对于每一期的号码中，在万能码中总能找到至少一个与之对应，也就是6个码能中一个就行，放宽点就是万能7码中有一个能中就行。万能码制作就是填入左边几十注号码，右边就能自动计算出一注万能6个码（或5、7个）来，这6个在左边号码中每期至少有一个会出现。就象01 09 10 14 24 32在左边号码中每期至少有一个会出现，如大师能帮忙，自当酬谢。例如附件，在左边填入号码，右边会计算出一组号码来，这组号码至少会有一个与左边的号码相同。

[ 本帖最后由 jydodo 于 2008-11-7 19:37 编辑 ]

作者: pureshadow 时间: 2008-11-7 19:42
有点明白是什么意思了，我想想。。。。。

作者: jydodo 时间: 2008-11-7 19:51
我有几十注号码（号码最小01，最大33），需要设计一些公式，得出5至7个号码（号码最小01，最大33），这5至7个号码至少会有一个与左边每一期的号码相同。
如下图，要计算出6个号码，6个号码中的随意任何1个在“开奖号码”中都可以找到。

期号开奖号码
2003009 5 9 18 20 22 30
2003010 1 2 8 13 17 24
2003011 4 5 11 12 30 32
2003012 2 12 16 17 27 30
2003013 8 13 17 21 23 32
2003014 3 5 7 8 21 31
2003015 4 11 19 25 26 32
2003016 11 17 28 30 31 33
2003017 5 8 18 23 25 31
2003018 5 16 19 20 25 28
2003019 4 8 12 13 16 33
2003020 7 10 25 26 27 32
2003021 14 15 18 25 26 30
2003022 2 7 11 12 14 32
2003023 1 10 20 22 26 31
2003024 2 7 15 17 22 30
2003025 1 5 11 13 14 27
2003026 8 13 15 26 29 31
2003027 1 11 14 17 27 28
2003028 6 13 16 20 28 32
2003029 2 7 15 26 29 32
2003030 2 6 13 14 23 27
2003031 11 17 20 22 28 32
2003032 4 11 25 27 29 30
2003033 1 7 14 20 27 30

作者: jydodo 时间: 2008-11-7 19:55
又如下表，是如何计算出01 04 09 10 14 24 32这6个号码呢？

期号       开奖号码                                              万能6红
2008102       3       7       12       21       25       32       1       9       10       14       24       32
2008103       1       12       16       18       22       33    1       9       10       14       24       32
2008104       3       6       8       17       24       31       1       9       10       14       24       32
2008105       5       17       19       27       28       32       1       9       10       14       24       32
2008106       14       19       25       27       29       30       1       9       10       14       24       32
2008107       6       13       18       22       27       32       1       9       10       14       24       32
2008108       9       10       15       17       23       30       1       9       10       14       24       32
2008109       4       7       9       16       21       28       1       9       10       14       24       32
2008110       10       16       22       23       29       31       1       9       10       14       24       32
2008111       17       18       21       25       31       32       1       9       10       14       24       32
2008112       5       13       14       19       22       23       1       9       10       14       24       32
2008113       6       9       10       12       17       22       1       9       10       14       24       32
2008114       4       9       20       24       25       31       1       9       10       14       24       32
2008115       2       12       13       14       17       18       1       9       10       14       24       32
2008116       3       7       21       22       24       29       1       9       10       14       24       32
2008117       3       5       7       10       14       33       1       9       10       14       24       32
2008118       4       9       16       27       31       33       1       9       10       14       24       32
2008119       5       7       9       15       24       29       1       9       10       14       24       32
2008120       10       11       22       24       26       33       1       9       10       14       24       32
2008121       2       22       23       27       31       32       1       9       10       14       24       32
2008122       2       8       11       14       19       26       1       9       10       14       24       32
2008123       10       11       15       16       25       29       1       9       10       14       24       32
2008124       1       7       10       13       21       22       1       9       10       14       24       32
2008125       10       11       12       15       26       29       1       9       10       14       24       32
2008126       4       11       12       14       20       30       1       9       10       14       24       32

作者: pureshadow 时间: 2008-11-7 20:21
这个问题要用代码了，函数搞不定。
代码高手们出来一下……[:28]

作者: pureshadow 时间: 2008-11-7 21:01
加了个辅助列，配合代码，搞定了！

[ 本帖最后由 pureshadow 于 2008-11-7 21:09 编辑 ]

作者: jydodo 时间: 2008-11-7 21:02
真的吗？

作者: pureshadow 时间: 2008-11-7 21:04
刚才忘了传附件了，在13楼上传了。
要启用宏啊。

作者: pureshadow 时间: 2008-11-7 21:06
不好意思啊，我粗心，H2：M2输入公式
=randbetween(1:33)
如果没有工具库就用这个公式
=INT(RAND()*33)
算了，重新上传吧，在13楼重新更新。

[ 本帖最后由 pureshadow 于 2008-11-7 21:09 编辑 ]

作者: jydodo 时间: 2008-11-7 21:44
pureshadow，你真是高手！非常感谢

作者: jydodo 时间: 2008-11-7 21:52
得寸进尺，不好意思，还要请pureshadow大师帮忙制作5码表，即图表右边为5个码。谢谢

作者: jydodo 时间: 2008-11-7 21:54
另外，计算图表时，有时运行时间很长，如何才能让图表停止呢？

作者: liwen 时间: 2008-11-8 16:36
小妖真高，不过使用随机数我找万能5码好久都出不来结果，反而使用穷举法能得出结果出来。
期号开奖号码自动计算出万能6红
2008102 3 7 12 21 25 32 10 14 16 24 32
2008103 1 12 16 18 22 33
2008104 3 6 8 17 24 31
2008105 5 17 19 27 28 32
2008106 14 19 25 27 29 30
2008107 6 13 18 22 27 32
2008108 9 10 15 17 23 30
2008109 4 7 9 16 21 28
2008110 10 16 22 23 29 31
2008111 17 18 21 25 31 32
2008112 5 13 14 19 22 23
2008113 6 9 10 12 17 22
2008114 4 9 20 24 25 31
2008115 2 12 13 14 17 18
2008116 3 7 21 22 24 29
2008117 3 5 7 10 14 33
2008118 4 9 16 27 31 33
2008119 5 7 9 15 24 29
2008120 10 11 22 24 26 33
2008121 2 22 23 27 31 32
2008122 2 8 11 14 19 26
2008123 10 11 15 16 25 29
2008124 1 7 10 13 21 22
2008125 10 11 12 15 26 29
2008126 4 11 12 14 20 30

作者: pureshadow 时间: 2008-11-8 18:28
什么叫穷举法？不懂诶。。。。。。[:30]
指点一下吧[:50]

作者: jydodo 时间: 2008-11-9 00:13
什么叫穷举法？[:17] [:17] [:17]

作者: liwen 时间: 2008-11-9 14:40

原帖由 pureshadow 于 2008-11-8 18:28 发表
什么叫穷举法？不懂诶。。。。。。[:30]
指点一下吧[:50]

小妖这不是寒掺人吗？

穷举就是一个一个试，可能要试到最后一组号码才能有结果，而小妖的随机数运气好的话很快就能得到结果．

作者: jydodo 时间: 2008-11-9 16:30
运算速度不知能不能快一些，有时持续很久。[:17] [:17] [:17]

作者: liwen 时间: 2008-11-9 16:58
我在有一台机上感觉速度还可以，但在另一台机上是感觉速度很慢，好象并不只是代码的问题。试试把doevents改变一下位置看是否会快点。不过估计没多大变化。

作者: pureshadow 时间: 2008-11-9 18:05

原帖由 liwen 于 2008-11-9 14:40 发表

小妖这不是寒掺人吗？

穷举就是一个一个试，可能要试到最后一组号码才能有结果，而小妖的随机数运气好的话很快就能得到结果．

这真的是我第一次听说穷举法。。。。。。[:30]
不过学会了，谢谢LIWEN[:50]

作者: pureshadow 时间: 2008-11-9 18:05
PS，LIWEN版主的做法，才是VBA的正道，我是VBA太差了，走的旁门

作者: 失恋太少 时间: 2008-12-4 21:38
不明白哦！！！～～

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)