ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

搜索
EH技术汇-专业的职场技能充电站 妙哉!函数段子手趣味讲函数 Excel服务器-会Excel,做管理系统 效率神器,一键搞定繁琐工作
HR薪酬管理数字化实战 Excel 2021函数公式学习大典 Excel数据透视表实战秘技 打造核心竞争力的职场宝典
让更多数据处理,一键完成 数据工作者的案头书 免费直播课集锦 ExcelHome出品 - VBA代码宝免费下载
用ChatGPT与VBA一键搞定Excel WPS表格从入门到精通 Excel VBA经典代码实践指南
楼主: chrisfang

[原创] 【多功能抽奖器】——晚会活动常备工具

  [复制链接]

TA的精华主题

TA的得分主题

发表于 2011-11-29 11:29 | 显示全部楼层
顶一下,学习学习。

TA的精华主题

TA的得分主题

发表于 2011-11-29 14:12 | 显示全部楼层
八仙过海,各显神通啊!

TA的精华主题

TA的得分主题

发表于 2011-12-9 17:39 | 显示全部楼层

TA的精华主题

TA的得分主题

发表于 2011-12-13 13:02 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
我要特殊加长字符的 楼主有没有啊

TA的精华主题

TA的得分主题

发表于 2011-12-13 14:43 | 显示全部楼层
chrisfang 发表于 2010-1-12 19:26
顶楼已经上传另一个无模式窗体的版本,可以在运行程序时打开另外的工作表。

此外,在单次使用本程序 ...

老大,发现个问题啊, 你的抽将器是把上一次中将的去掉然后在抽一下个奖的么,还是允许重复中奖的啊,如果是不允许重复中将的,那么应该在每次结速后中奖率应该是当前中的人数去除总人数减掉上次奖项已经抽掉的人啊.

TA的精华主题

TA的得分主题

发表于 2011-12-13 15:56 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
vivion 发表于 2011-12-13 14:43
老大,发现个问题啊, 你的抽将器是把上一次中将的去掉然后在抽一下个奖的么,还是允许重复中奖的啊,如果 ...

自己解决了 在VBA里把PCONT-ACCOUNT+PLAG 这样就可以了

点评

抽奖方式是不重复的,你说的可能是中奖率的显示结果不对?我回头再看看  发表于 2011-12-14 09:52

TA的精华主题

TA的得分主题

发表于 2011-12-14 16:14 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助
顶顶顶,牛贴啊,带我入另一道门

TA的精华主题

TA的得分主题

 楼主| 发表于 2011-12-14 20:15 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
vivion 发表于 2011-12-13 14:43
老大,发现个问题啊, 你的抽将器是把上一次中将的去掉然后在抽一下个奖的么,还是允许重复中奖的啊,如果 ...

仔细再思考了一下,我觉得我目前程序的做法没什么问题,在不同级别的抽奖过程中是将前一次中奖人员去掉以后再进行后续抽奖的。
至于中奖率的算法,我不太认同你的说法。
假定有10个人,要抽5个三等奖、3个二等奖、2个一等奖。那么三等奖中奖率应该是5/10=50%,二等奖是30%,一等奖是20%,对吧?而按照你的说法,二等奖中奖率是 3/(10-5)=60%?到了一等奖岂不是变成100%中奖啦?

TA的精华主题

TA的得分主题

发表于 2011-12-15 08:39 | 显示全部楼层

TA的精华主题

TA的得分主题

发表于 2011-12-15 10:39 | 显示全部楼层
想请问一下如何修改抽奖界面内字体的大小?我用的手机号码,故显示时排成了两行,且第二行只能显示一半,有点难看

点评

近期准备做个升级版解决这个问题  发表于 2011-12-17 14:44
您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

手机版|关于我们|联系我们|ExcelHome

GMT+8, 2024-9-28 05:09 , Processed in 0.049758 second(s), 7 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

沪公网安备 31011702000001号 沪ICP备11019229号-2

本论坛言论纯属发表者个人意见,任何违反国家相关法律的言论,本站将协助国家相关部门追究发言者责任!     本站特聘法律顾问:李志群律师

快速回复 返回顶部 返回列表