搜索
写经验 领红包
 > 家居

利用excel制作监考查询系统的软件(如何excel做监考表)

导语:利用Excel制作监考查询系统

要求:

1.通过切换按钮实现按教师、班级查询监考信息

2.自动统计教师监考次数

操作:

1.建立监考信息表

在打开的excel工作薄中,将sheet1改为“教师、班级考试查询”,从B3单元格到I3单元格中分别输入考试信息列标题,如:“日期”、“时间”、“课程”、“班级”、“人数”、“考试地点”、“监考老师”,注意列标题一定要空出两行两列,在对应的单元格中输入相应信息。

2.建立班级、教师信息表

新建一个工作表,命名为“姓名和班级”,从A1以下输入教师姓名,C1以下输入班级名称。

3.制作查询界面

合并J1、J2单元格,输入“查询方式”,合并K1、K2,制作下拉菜单,单击“数据”/“数据验证”/“数据验证”,在打开的“数据验证”选项卡中选择“设置”,在设置中的“允许”中选择“序列”,单击“来源”中输入“按班级,按姓名”,单击“确定”。

合并J3、K3单元格,输入“=IF(K1=,,)”,表示如果K1是“按班级”,显示“请选择班级名称”,否则即“按姓名”,则显示“请选择姓名”。

合并J4、K4单元格,制作下拉菜单,在“来源”中输入函数公式“=IF($K$1=,姓名和班级!C1:C55,IF($K$1=,姓名和班级!A1:A41))”,表示如果K1是按“按班级”,则在“姓名和班级”工作表以C1:C55数据产生下拉菜单,如果K1是按“按姓名”,则在“姓名和班级”工作表以A1:A41数据产生下拉菜单。

合并J5、K5单元格,输入“=IF(K1=,,)”,表示如果K1是按“按班级”,则显示“考试次数为”,如果K1是按“按姓名”,则显示“您的监考次数为”。注意一个班级进行同一门考试时,一般分为两个考场,所以计算出来的班级考试次数比实际多一倍。

4.利用函数制作查询信息

首先在A4单元格内输入公式“=(H4=J$4)+(E4=J$4)+A3”,利用自动填充功能向下拖动鼠标,直到所有拖过的单元格出现计算为止。将B3单元格到I3单元的考试信息复制到M3到S3单元格。

在M4中输入“=IFERROR(VLOOKUP(ROW(A1),$A:$I,COLUMN(B1),0),)”,利用自动填充功能向右、向下拖动鼠标,到表格行、列最后。

隐藏“姓名和班级工作表”,同时隐藏A列到I列,只保留J列到S列,调整表格格式

分别用鼠标切换班级或姓名下拉菜单,选择需要查询的班级或教师姓名,即可产生查询结果。效果图如下:

5.利用条件格式设置查询出来的班级或姓名为特殊显示

选中M4到S200区域,单击“开始”/“格式”/“条件格式”/“新建规则”,选择“使用公式确定要设置格式的单元格”,在“为符合此公式的值的设置格式”中输入“=COUNTA($m4:$s4)=7”,单击“格式”,在“设置单元格格式”中选择“填充”,选择一种颜色,单击“确定”,即可为查询出来的结果设置填充效果。

6.利用单元格互换功能调整监考老师

首先安装“方方格子”,安装好以后菜单上出现“DIY工具箱”,选中需要调整的两个单元格,单击“DIY工具箱”,单击“收缩箱”,找到“两区域互换内容”,选中右键,选择执行即可完成两个单元格内容交换。

也可以通过“开发工具”插入制作交换按钮,需要代码执行,内容互换代码为:

Sub 内容互换()

Dim TheArea1, TheArea2 As Variant

If Selection.Areas.Count <> 2 Then

MsgBox

Exit Sub

ElseIf Selection.Areas(1).Cells.Count <> Selection.Areas(2).Cells.Count Or _

Selection.Areas(1).Rows.Count <> Selection.Areas(2).Rows.Count Then

MsgBox

Exit Sub

Else

TheArea1 = Selection.Areas(1).Cells

TheArea2 = Selection.Areas(2).Cells

Selection.Areas(1).Cells = TheArea2

Selection.Areas(2).Cells = TheArea1

End If

End Sub

案例总结:本案例主要是多条件多列显示查询原理,即通过创建辅助列(A列),然后利用行、列函数ROW、COLUMN、VLOOKUP函数、IF函数以及条件计数函数,通过下拉菜单进行切换方式,随着查询方式的改变,查询结果也随之变化,同时使用“条件格式”的“使用公式确定要设置格式的单元格”,将筛选出来的结果设置格式,在原数据基础上,通过vba代码实现单元格内容互换,实现监考老师监考时间进行调整。作为excel高级应用案例可激发学生提高函数的理解,增强学生思考问题能力。

免责声明:本站部份内容由优秀作者和原创用户编辑投稿,本站仅提供存储服务,不拥有所有权,不承担法律责任。若涉嫌侵权/违法的,请反馈,一经查实立刻删除内容。本文内容由快快网络小媛创作整理编辑!