用EXCEL的VBA做一个excel 比赛分组抽签签程序

查看: 3745|回复: 30
实用抽签小工具
阅读权限95
在线时间 小时
本帖最后由 yjh_27 于
13:25 编辑
求助:做一个实用抽签小工具
选a列单元格,抽签
选a1或a列整列,用于清空重抽
完成抽签后,按抽签号排序
补充内容 ( 20:24):
适用于签数大于、小于、等于人数三种情况 通用的抽签程序&&见26L
21:08 上传
点击文件名下载附件
21.26 KB, 下载次数: 251
13:24 上传
点击文件名下载附件
22.63 KB, 下载次数: 168
空二行标题行
实现技巧很好!
阅读权限70
在线时间 小时
& & & & & & & &
很好,谢谢分享
阅读权限95
在线时间 小时
优秀作品!!
只是有点疑问:为何不用香川的经典数组洗牌法,获取不重复随机数,可以给所有参与抽签的用户一次性抽签到位的……
阅读权限95
在线时间 小时
请教:以下代码中32与13哪个是回车,哪个是空格?Private Sub CommandButton1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
If KeyAscii = 32 Then
& & Call CommandButton1_Click
ElseIf KeyAscii = 13 Then
& & Call CommandButton1_Click
End If
End Sub
复制代码
阅读权限95
在线时间 小时
aoe1981 发表于
优秀作品!!
只是有点疑问:为何不用香川的经典数组洗牌法,获取不重复随机数,可以给所有参与抽签的用户 ...
见原帖楼主要求。增加抽签人的参与度,减少程序作弊的嫌疑(至少给人感觉如此)。
详见Ascii 码表
阅读权限95
在线时间 小时
yjh_27 发表于
见原帖楼主要求。增加抽签人的参与度,减少程序作弊的嫌疑(至少给人感觉如此)。
哦,多谢指点……
阅读权限95
在线时间 小时
本帖最后由 yjh_27 于
21:34 编辑
用电子 表格实现两组监考教师考场抽签(急)
21:34 上传
点击文件名下载附件
43.96 KB, 下载次数: 83
阅读权限20
在线时间 小时
非常好的抽签工具,
抽签可能会出现三种情况:签数与人数相同,大于人数,小于人数。
如果出现抽签时签数少于抽签的人数,
即可能出现重复抽签,尽可能减少重复的抽签数。应如何修改代码!
阅读权限20
在线时间 小时
& & & & & & & &
非常好的抽签工具,
抽签可能会出现三种情况:签数与人数相同,大于人数,小于人数。
如果出现抽签时签数少于抽签的人数,
即可能出现重复抽签,尽可能减少重复的抽签数。应如何修改代码!
阅读权限95
在线时间 小时
yishang3 发表于
非常好的抽签工具,
抽签可能会出现三种情况:签数与人数相同,大于人数,小于人数。
如果出现抽签时签数 ...
签数由B列决定,保持B、C列一致即签数与人数相同
无需改代码
最新热点 /1
ExcelHome每周都有线上直播公开课,
国内一流讲师真身分享,高手贴身答疑,
赶不上直播还能看录像,
关键居然是免费的!
厚木哥们都已经这么努力了,
你还好意思说学不好Office。
玩命加载中,请稍候
玩命加载中,请稍候
Powered by
本论坛言论纯属发表者个人意见,任何违反国家相关法律的言论,本站将协助国家相关部门追究发言者责任! & & 本站特聘法律顾问:徐怀玉律师 李志群律师这是我用excel中的vba设计的一个座位随机抽签程序,为什么每次运行的结果都是一样
这是我用excel中的vba设计的一个座位随机抽签程序,为什么每次运行的结果都是一样
如题 有附件
Rnd函数使用给定的种子会生成随机数。因此每次开始都产生同样的随机数。因此每次运行的结果都是一样。
但把剪切改成拷贝后,工作情况已经完全不一样了。变成连续调用Rnd函数。因为以后每一次调用 Rnd 函数,都用数列中的前一个数作为下一个数的种子。每次运行的结果当然是不一样。其实根本没有解决问题。
针对这个问题,VB设计者早已考虑到,解决方法是:
在调用 Rnd 之前,先使用无参数的 Randomize 语句初始化随机数生成器,该生成器具有根据系统计时器得到的种子。
请遵守网上公德,勿发布广告信息
相关问答:
匿名回答于
我试过了,结果并不会一样的,为了更好验证是不是一样,我把代码中的剪切改成拷贝,你也可以试试,结果完全不一样的.
附件:座位抽签.xls
已验证,加Randomize 语句在sub内首句,结果不一样。如果不加,结果就一样。呵可Powered by
本论坛言论纯属发表者个人意见,任何违反国家相关法律的言论,本站将协助国家相关部门追究发言者责任! & & 本站特聘法律顾问:徐怀玉律师 李志群律师

我要回帖

更多关于 比赛分组抽签 的文章

 

随机推荐