EXCEL中通过VBA宏编写一个简易抽奖小工具 _VBA宏

最近有粉丝在后台向我提了一个工作中的小需求，具体如下：

■ 因为公司要组织一个知识竞赛，其中有一个游戏环节，需要从一组名单中随机选出指定数量的人员参加游戏，并且需要在大屏中滚动名单以增强游戏紧张感。当然最重要的是最终被选中的名单中不能有重复名单出现。她希望能通过Excel来实现这个需求。

需求分析：其实这个需求与抽奖非常类似，我们可以通过Excel的VBA宏功能来编写一个小工具来实现这个需求，说干就干，以下就是最终实现的成品效果：

文章插图
抽奖小工具演示
功能说明：
第1步、名单在sheet2《名单维护》工作表的A列中输入
第2步、设置抽奖人数
第3步、点击开始按钮，名单开始滚动
【EXCEL中通过VBA宏编写一个简易抽奖小工具】第4步、点击停止按钮，出现获奖人员名单

EXCEL中通过VBA宏编写一个简易抽奖小工具