Excel精英培训网

 找回密码
 注册
数据透视表40+个常用小技巧,让你一次学会!
查看: 2014|回复: 5

各位老师帮忙看看这个抽奖程序问题出在哪儿了?

[复制链接]
发表于 2011-12-22 19:26 | 显示全部楼层 |阅读模式
我打算从400个名单中,抽取30个中奖者。每摁一次空格键,开始抽奖,再摁空格键,抽奖停止,抽中三个,分别列在a2开始的第一列中。然后再摁空格键,进入下次抽奖。一直到抽满30个为止。但很奇怪的时候,有时候摁空格键我得多摁好几次,抽奖才会停止。各位老师帮忙看看,是怎么回事。见附件。各位老师请多试几次,有时候摁一次空格键,抽签会停止。有时候得多摁好几次才可以。不知道为什么,请各位老师测试,谢谢。


抽奖.zip

47.49 KB, 下载次数: 62

 楼主| 发表于 2011-12-23 13:00 | 显示全部楼层
啊哦。。。。各位老师帮帮忙啊 多谢啦
回复

使用道具 举报

发表于 2011-12-23 13:26 | 显示全部楼层
回复

使用道具 举报

 楼主| 发表于 2011-12-23 15:22 | 显示全部楼层
liuguansky 发表于 2011-12-23 13:26
我运行正常。

多试几次啊 我有时候空格键得摁好几次有效啊 难道我电脑的缘故?
回复

使用道具 举报

发表于 2011-12-23 21:08 | 显示全部楼层
挺不错的小软件、下下来了回头看看
回复

使用道具 举报

发表于 2011-12-29 20:35 | 显示全部楼层
hamsik11 发表于 2011-12-23 15:22
多试几次啊 我有时候空格键得摁好几次有效啊 难道我电脑的缘故?

       sleep 5 '速度调节(可控制在3至8之间)
       DoEvents


把sleep 参数调整一下试试吧。


回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|Archiver|Excel精英培训 ( 豫ICP备11015029号 )

GMT+8, 2024-5-5 17:52 , Processed in 0.415946 second(s), 13 queries , Gzip On, Yac On.

Powered by Discuz! X3.4

Copyright © 2001-2020, Tencent Cloud.

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