怎么用excel表格做抽签

1.我想用excel做一个自动抽签程序(以下是电脑报里面介绍的内容,?

同时按Alt和F11进入宏界面，点菜单的插入，模块，粘贴如下代码：Dim Flag As BooleanSub aaa()Dim cell As RangeDo Until FlagRange("C6:G10")。

Cells(Int(Rnd() * 25) 1)。 = FalseEnd SubSub bbb()Flag = TrueEnd Sub回到Excel，在C6:G10输入25个签（代码中的粗体字按实际修改），插入两个图形比如方框，一个写”抽签“，一个写”暂停“，右键点第一个框，指定宏，aaa；右键点第2个框，指定宏，bbb就可以了。