展开全部
1. 新建一个Excel文件,命名为“随机点名”后保存。在A1中输入姓名,在B1中输入“每组人数”,在C1中输入“分组”,在A2、A3……中输入学员名子。
2. 单击“工具”宏Visual Basic,后进入编辑窗口。
3. 右击“Microsoft Excel对象”,选择“插入”“模块”。
4. 双击“模块1”,将以下代码输入右侧的代码编辑区:
Sub rollcall()
Dim class As Range
Set class = Range("A2", Range("A2").End(xlDown))
n = class.Rows.Count
Randomize
MsgBox class(Int((n + 1) * Rnd + lowerbound), 1)
End Sub
5. 关闭Visual Basic编辑器,回到Excel窗口。
6. 单击“视图”工具栏窗体,弹出“窗体工具箱”。
7. 在窗体工具箱中单击“按钮”,在Excel中拖拉出一个按钮,松开鼠标后,弹出“指定宏”对话框,从中选择rollcall后单击“确定”按钮。
8. 再次保存Excel文件,并关闭“窗体工具箱”。至此,该程序就可以使用了。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
在单元格中输入公式:=INDEX(B1:B32,INT(RAND()*33))
每次刷新都可以选择一个名字
每次刷新都可以选择一个名字
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询