vba实例，用vba写一个有意思的抽奖系统

学代码，做出点东西特别有成就感，今天我们来完成一个抽奖系统，感受一下成就感带来的愉悦！come on!

先给你们展现一下成果：

此抽奖适合各场合抽奖，随时准备震惊四座！

首先看一下我们的数据和页面

来看一下代码吧：

注意：'抽奖系统!A1单元格看起来是空白的，其实是抽取的人员名单表中员工的所在行号，只是白色看不见它。

'A1单元格=RANDBETWEEN(2,COUNTA(人员名单!A:A))，这句话就是从2到员工总数，随机取一个数。

Private Declare PtrSafe Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long) '暂停 64位系统'Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long) '暂停  32位系统Dim mark As Boolean
Sub 立即开始()[A2] = "=INDEX(人员名单!A:B,抽奖系统!A1,1)&CHAR(10)&INDEX(人员名单!A:B,抽奖系统!A1,2)"//A2存放员工工号和姓名mark = TrueDo While markDoEventsSleep 50ActiveSheet.CalculateLoopEnd SubSub 停止抽奖()mark = FalseEnd SubSub 保存抽奖()CH = [A1]ActiveCell = [A2]Sheets("人员名单").Cells(CH, 1).EntireRow.DeleteApplication.EnableEvents = False[A2] = ""Application.EnableEvents = True'
End Sub

每天学一点，工资翻一番，关注我的公众号“学会数据分析”，一起加油，一起进步！欢迎你的关注！

上面抽奖的文件地址，绝对可用：

链接: https://pan.baidu.com/s/1F1718dSh8mYWGPuZjJfmSw 提取码: 4dyq

提取完文件可不可以关注我呀！白嫖虽好，可不要贪杯哦！

vba实例，用vba写一个有意思的抽奖系统相关推荐

python写一个系统-使用Python写一个量化股票提醒系统
大家在没有阅读本文之前先看下python的基本概念, Python是一种解释型.面向对象.动态数据类型的高级程序设计语言. Python由Guido van Rossum于1989年底发明,第一个公开 ...
用python读取股票价格_使用Python写一个量化股票提醒系统
大家在没有阅读本文之前先看下python的基本概念, Python是一种解释型.面向对象.动态数据类型的高级程序设计语言. Python由Guido van Rossum于1989年底发明,第一个公开 ...
python量化股票源码_使用Python写一个量化股票提醒系统
大家在没有阅读本文之前先看下python的基本概念, Python是一种解释型.面向对象.动态数据类型的高级程序设计语言. Python由Guido van Rossum于1989年底发明,第一个公开 ...
【NLP】Pyhon+讯飞开放平台:手把手带你写一个智能语音播报系统
手把手带你写一个智能语音播报系统. 微信扫码登陆讯飞开放平台:https://www.xfyun.cn/ 完成个人认证. 在控制台创建应用,注意应用名称全库查重,很容易跟别人重复. 可查看到pytho ...
python写炒股软件_使用Python写一个量化股票提醒系统
大家在没有阅读本文之前先看下python的基本概念, Python是一种解释型.面向对象.动态数据类型的高级程序设计语言. Python由Guido van Rossum于1989年底发明,第一个公开 ...
如何用 Python 写一个简易的抽奖程序
不知道有多少人是被这个头图骗进来的:) 事情的起因是这样的,上周有同学问小编,看着小编的示例代码敲代码,感觉自己也会写了,如果不看的话,七七八八可能也写的出来,但是一旦自己独立写一段程序,感觉到无从下 ...
python测试抽奖脚本_使用 Python 写一个简易的抽奖程序
不知道有多少人是被这个头图骗进来的:) 事情的起因是这样的,上周有同学问小编,看着小编的示例代码敲代码,感觉自己也会写了,如果不看的话,七七八八可能也写的出来,但是一旦自己独立写一段程序,感觉到无从下 ...
怎么用python制作简单的程序-如何用 Python 写一个简易的抽奖程序
不知道有多少人是被这个头图骗进来的:) 事情的起因是这样的,上周有同学问小编,看着小编的示例代码敲代码,感觉自己也会写了,如果不看的话,七七八八可能也写的出来,但是一旦自己独立写一段程序,感觉到无从下 ...
python游戏脚本实例-使用Python写一个贪吃蛇游戏实例代码
我在程序中加入了分数显示,三种特殊食物,将贪吃蛇的游戏逻辑写到了SnakeGame的类中,而不是在Snake类中. 特殊食物: 1.绿色:普通,吃了增加体型 2.红色:吃了减少体型 3.金色:吃了回到 ...

vba实例，用vba写一个有意思的抽奖系统

每天学一点，工资翻一番，关注我的公众号“学会数据分析”，一起加油，一起进步！欢迎你的关注！

提取完文件可不可以关注我呀！白嫖虽好，可不要贪杯哦！

vba实例，用vba写一个有意思的抽奖系统相关推荐

最新文章

热门文章