加载中…
个人资料
靈相天機
靈相天機
  • 博客等级:
  • 博客积分:0
  • 博客访问:8,401
  • 关注人气:3
  • 获赠金笔:0支
  • 赠出金笔:0支
  • 荣誉徽章:
相关博文
推荐博文
谁看过这篇博文
加载中…
正文 字体大小:

[转载]我的双色球软件—用宏创建号码伴侣表

(2017-06-30 04:47:43)
标签:

转载

上次我们就会制作号码伴侣表了。只要在中奖表的单元格B9中输入1,将I1- AO1复制,将它贴到一个新工作表里:选中单元格右击-选择性粘贴-数据-确定。在中奖表的单元格B9中输入2,将I1- AO1复制,在新工作表里下一行单元格右击-选择性粘贴-数据-确定。这样依次做下去,能就得到一张33×33的中奖伴侣表了。当然上边和左侧的号码行列是预先输入的。

我很喜欢号码伴侣表,其实它最贴切的名字应该叫号码组合频率统计表。这张33×33的统计表上我们可以很方便地找到任意两个号码组合出现的频率,给我们选号提供适当的提示和参考。这1089个数据,尽管有528个数字是重复的,但还是给我们提供了浏览的方便。想一想,如果是528×2的横表或2×528的纵表,那多不方便啊。开奖不断地进行着,喜欢这张号码组合频率统计表的我就得不断地将它更新。现在中奖表更新已经很方便了,只要在数据表里插上一行,填上开奖号码,复制黏贴到中奖表就ok了。伴侣表要复杂得多,操作太多了。光出一行数据,我们要打开中奖表-选中单元格B9-B9中输入1-选中单元格 I1AO1-复制-打开号码组合表-选中单元格C3-右击-选择性粘贴-数据-确定。好家伙,共11次操作,出一张完整的伴侣表有要进行363次操作!历史上我曾经做过好多次这样的简单的重复操作,直到有一天我找到了宏!

关于宏,不是本日志可以简单说明白的。有兴趣的同道可以到互联网去搜一下教程,保管叫你看得满意到头痛的程度。这个过程对于我这种习惯于急用先学,立竿见影的人来说,真是太难为我了。但是学会录制宏,运行宏,其实是每一个稍有excel操作技能的人都能很容易学会的。在长达近一年的应用宏的过程中,一方面我享受着使用宏带来的操作愉悦,一方面我又常常被一个问题所困扰着:录制的宏难道就只能这样千篇一律重复着我示范过的操作吗!说明白一点,我想用宏来解决这样的问题:我有一系列数据,想把它们逐一输入到我预定的工作表中去进行统计,并能够将每一次统计结果逐一显示在我指定的工作表里。难道我非得去学编程吗?谢天谢地,我终于用宏解决了这个问题。有志举一反三深入运用宏的同道,可以在下面的标准操作里一覌门襟。不作他想的你就照此办理,ok

准备工作一。首先我们得将VBA工具放到工具栏里以方便今后的使用。

[转载]我的双色球软件—用宏创建号码伴侣表[转载]我的双色球软件—用宏创建号码伴侣表

点击工具-自定义-工具栏在visualBasic处打钩-关闭。[转载]我的双色球软件—用宏创建号码伴侣表

出现VBA工具图标-拖入工具栏

准备工作二。重命名一张工作表为伴侣表,并如图所示输入相关数据。在B1-AH1输入33-1,在B3-AH3输入1-33,在A4-A36输入1-33[转载]我的双色球软件—用宏创建号码伴侣表

准备工作三。录制宏是一个非常细致的工作。你的每一个操作,包括多余的重复的错误的操作,它都会忠实地记录下来(真是SB!)。363次操作难免会有失误,我用两个方法来应对。其一是尽量用简单的宏来构建复杂繁琐的宏;其二是动手录制宏前先仔细定下标准操作流程。我们先来录制简单的宏伴侣1,它的标准操作流程如下:

宏伴侣1的标准操作流程

打开伴侣表-选中单元格 B4AH4-插入-单元格-活动单元格下移-确定-选中单元格 B1-复制-打开中奖表-选中单元格 G9-粘贴-选中单元格 I1AO1-复制-打开伴侣表-选中单元格 B4AH4-选择性粘贴-数值-确定-选中单元格 B1-删除-右侧单元格左移-确定。

这个标准操作流程的精华在开始和结束的部分。我还记得,那一夜突来的灵感曾使我夜不能寐。简直和当年基辛格的心情差不多。为了中美建交的上海公报在台湾问题上难以楚辞时,基辛格绞尽脑汁后,忽然想到用“在台湾海峡两岸的所有中国人都认为只有一个中国”这句话来表述时高兴得跳了起来。呵呵,有点言过其实了。但对于我来说,长期困扰我的难题解决了。这样宏就可以自动地依次写入指定的数据,自动地依次记录下每次统计结果。

开始录制宏伴侣1,点击VBA图标上的●,出现录制新宏对话框。在宏名框内输入伴侣1-保存在当前工作簿-确定。见图。[转载]我的双色球软件—用宏创建号码伴侣表

出现结束停止按钮。[转载]我的双色球软件—用宏创建号码伴侣表

这个按钮到录制完后才按停,如不出现,结束时按工具栏里VBA图标中安全左边的■!

好,现在心无旁骛地按上面的标准操作流程进行操作,完了按停止按钮。确认无误后,我们再来重新设置伴侣表的第一行。从B1起连续输入3332,…,13332,…,1。也就是说,当宏伴侣1运行33次后,第一行还有33个等待统计的数据!

可以现在就运行宏。点击工具栏里VBA图标中左边的三角形播放记号,出现选择宏对话框,选中伴侣1-执行。[转载]我的双色球软件—用宏创建号码伴侣表


看看运行的结果,是不是很妙。好,在进行录制正式的宏伴侣表前,清除掉全部运行后留下的数据,千万千万!若有残留数据,无数次运行后,数据将会溢出,宏将停止工作!

宏伴侣表的标准操作流程:

点击VBA图标上的●-录制新宏对话框-在宏名框内输入伴侣表-保存在当前工作簿-确定-点击工具栏里VBA图标中左边的三角形播放记号-出现选择宏对话框-选中伴侣1-执行。重复执行宏伴侣133次!-选中单元格B37-AH69(行数多一点无所谓)-编辑-清除-全部-选中单元格B1-AH1-复制-选中单元格AI1-BO1-粘贴-结束按钮。

开始操作吧。

宏的安全设置,我一般设置为中。那么每当打开工作簿和保存工作簿时都会有对话框出现,简单地确定就可以了。

这个宏伴侣表除了可以做2个号码组合的频率统计表外,当然可以做3个号码组合的频率统计。但一张表实在太大了,我将它分解成局部来处理。我们来做组合中最小的号码为13个号码组合的频率统计表。在中奖表里选中单元格B9,输入1,回到伴侣表(运行宏伴侣表时,打开伴侣表工作表才不出差错!!!),运行宏-伴侣表。统计表如下图。

[转载]我的双色球软件—用宏创建号码伴侣表

删除第一行第一列就成了。怎样解读这张表,我想你懂的!我的心里正想着下次的标题呢:176PK336

0

  • 评论加载中,请稍候...
发评论

    发评论

    以上网友发言只代表其个人观点,不代表新浪网的观点或立场。

      

    新浪BLOG意见反馈留言板 电话:4000520066 提示音后按1键(按当地市话标准计费) 欢迎批评指正

    新浪简介 | About Sina | 广告服务 | 联系我们 | 招聘信息 | 网站律师 | SINA English | 会员注册 | 产品答疑

    新浪公司 版权所有