打印本文 关闭窗口 | |
execl点名程序 | |
作者:佚名 文章来源:本站原创 点击数 更新时间:2014-05-09 21:29:58 文章录入:pygbw 责任编辑:pygbw | |
|
|
原文地址:Excel随机点名程序作者:saysay
Excel随机点名程序能够帮助老师在不熟悉学员的情况下,进行点名提问等教学活动。对集中学员注意力投入学习,也有促进作用。但对于熟悉学生情况的班主任,可能就不太适用了。现将制作过程介绍如下,供大家练习使用。 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文件,并关闭“窗体工具箱”。至此,该程序就可以使用了。 |
|
打印本文 关闭窗口 |