想用excel做一个自动抽奖程序(以下是电脑报介绍的内容,不知道为什么在我的电脑里操作失败)

同时按Alt和F11进入宏界面,点击插入菜单,粘贴以下代码:

布尔型Dim标志

次级aaa级()

将单元格作为范围变暗

做直到标记

范围(" C6:G10 ")。单元格(Int(Rnd() * 25) + 1)。挑选

多项活动

标志=假

末端接头

子bbb()

标志=真

末端接头

回到Excel,输入25个标签:G10(代码中粗体字根据实际情况修改),插入两个图形,比如方框,一个带“抽签”,一个带“暂停”,右键单击第一个方框,指定宏,aaa;右键单击第二个框并指定宏bbb。

去做吧。