用EXCEL制作模拟考试系统精编版
利用Excel VBA制作无纸化客观题考试系统
组 卷 的方 法 ，使 得 每 个 考 生 的 试 卷 均 不 相 同 ， 这样 不 仅 公 平 而
且 可 以 避 免作 弊 。 （ ） 答 题 时 只 需 要 学 生 使 用 鼠标 单 击 选 项 ，所 选 答 案 自 ４ 动被记录到 “ 题卡”工作表中。 答
图 ２
蚺 器 ０
…
…
…
…
…
…
…
…
…
…
…
…
…
…
…
’…
…
…
实用第一／ 智慧密集
… … 一 … … … …
２ ２ １ 置 抽 题 和 考 试 时 间 区 ．． 设 （ ） 设 置 Ａ１ Ｍ １ 一 ３为抽 题 区 ，输 入 文 字 和章 号 。
利用 Ｅ ｃｌ Ａ 制作 无纸化 客观题 考试 系统 ｘ ｅ ＶＢ
张 贻 忠
摘 要 ：客 观 题 考 试 阅卷 一 直是 一 个 老 大难 ，手 工 阅卷 不仅 费时 费工 还容 易 出错 ， 用光标 阅读机 阅卷 ．不仅 涂 答题 卡会 浪 费考 生 宝 贵 的答 题 时 间还 增 加 考 试 成 本 。现 在 学校微 机 教 室 大量 增 加 ，
（） Ａ至 Ｑ列为答题 区。 １
（ ） Ａ１ 元 格 内 输 入 “ 算 机 基 础 知 识 单 选 题 上 机 考 ２ 单 计
试” ，合 并 Ａ１ Ｆ 。 至 】
的数 据 区域 。本 例 共 设 置 １ ０章 ，如 图 ２所示 。
（） Ａ ３ ２内 输 入 “ 号 ： ，２用 于 输 入 学 号 （ 例 中学 号 学 ”Ｂ 本 使 用 ３位 阿 拉 伯 数 字 以便 成 绩 汇 总 时 使 用 ） ２内输 人 “ 号 ，Ｃ 学 使 用 阿拉 伯 数 字 ” 。 （） Ａ ４ ３内 输 人 “ 注 意 ： ， 并 Ａ 、Ｂ ，文 字 右 对 齐 ， ” 合 ３ ３
用Excel建立模拟考试系统
用Excel建立模拟考试系统做教师的少不了为学生制作各种各样的考试卷子，市面上虽有各种模拟考试系统，却因程序制作复杂，将老师们拒之门外。
其实根本不需要懂编程，用Excel 2003你也可以制作一个类似的系统。
一个可以自动出题、验证考号、答题后自动评分、保存记录的模拟考试系统，当然你也可以给它加上其他功能系统设计1.建立题库打开Excel 2003，建立“单选题”工作表(如图1)，在A2输入公式=ROW()-1&"."以自动生成序号，在D2输入=IF(C2="","",RAND())，选中A2:D2拖动其填充柄向下复制到其他单元格，大概有几百行也就够了，剩下的需要时再复制。
按住Ctrl键拖动工作表标签复制出两份，分别重命名为多选题、判断题。
图12.设计试卷建立“试卷”工作表，你可以按需要设置试卷，并输入单选题、多选题、判断题三个大题目，多选题需注明错、漏、多选均不得分。
并留出相应的题目位置，单选题30题(A5:C34)，多选题40(A36:C75)，判断题30题(A77:C106)。
用“自选图形/基本形状”中的棱台画一个按钮，选中在名称框中输入“出题按钮”4字回车，把它命名为“出题按钮”。
再右击此按钮选择“添加文字”，在按钮上输入“出题”2字。
同样再画一个按钮，把它命名为“评分按钮”，添加文字“评分”。
(如图2)图23.显示题目在A5输入公式=INDIRECT("单选题!R"&ROW()-3&"C"&COLUMN(),0)，选中A5复制，再选中A5:C34进行粘贴。
同样在A36输入公式=INDIRECT("多选题!R"&ROW()-34&"C"&COLUMN(),0)并复制到A36:C75，在A77输入公式=INDIRECT("判断题!R"&ROW()-75&"C"&COLUMN()并复制到A77:C106。
用EXCEL制作模拟考试系统
1.建立题库打开Excel 2010，建立“模拟考试系统-出题测试版”。
打开此工作簿，建立“单选题”工作表(如图1)，在A2输入公式=ROW()-1&"."以自动生成序号，在D2输入=IF(C2="","",RAND())，选中A2:D2拖动向下填充几百行。
按住Ctrl键单击“单选题”工作表标签拖动复制出两份，分别重命名为“多选题”（如图2）、“判断题”（如图3），分别输入题目和答案，按Alt+回车键换行。
请注意以下提示：1、以上3个工作表，在B列输入单选题题目（样式随意，但一道题只能占一个单元格），在C 列输入对应考题的答案，答案输入时注意不要有多余字符。
2、“多选题”工作表的答案必须按ABCD的顺序填写，例如答案ABD，不能写ADB、BAD、BDA、DAB、DBA，答错、少答和多答均不得分；“判断题”工作表的答案只能有两种，本题按“正确”和“错误”作为答案，其他形式如“对”和“错”、“√”和“×”也可以。
3、题库中题目数量根据实际情况而定，多多益善。
本例中题库数目为单选题60道、多选题50道、判断题45道。
图1图2图32.建立考生名单新建“考生名单”工作表，在A、B、C列分别输入序号、准考证号、考生姓名，选中B列在名称框中输入“考号”，回车确定把B列命名为考号(如图4)。
完成后可在名称管理器内看到名字为“考号”的名称，引用位置为“考生名单”工作表的B列。
图43.设计试卷建立“试卷”工作表，按需要设置试卷，序号生成方式如题库序号。
单选题30题(A5:C34)，多选题40(A36:C75)，判断题30题(A77:C106)。
在B4输入“单选题（每题1分）”，在B35输入“多选题（每题1分，错、漏、多选均不得分）”，在B76输入“判断题（每题1分）”。
用“自选图形/基本形状”中的棱台画一个按钮，选中在名称框中输入“出题按钮”4字回车，把它命名为“出题按钮”。
用E CEL制作模拟考试系统
1.建立题库打开Excel 2003，建立“单选题”工作表(如图1)，在A2输入公式=ROW()-1&"."以自动生成序号，在D2输入=IF(C2="","",RAND())，选中A2:D2拖动其填充柄向下复制到其他单元格，大概有几百行也就够了，剩下的需要时再复制。
按住Ctrl键拖动工作表标签复制出两份，分别重命名为多选题、判断题。
图12.设计试卷建立“试卷”工作表，你可以按需要设置试卷，并输入单选题、多选题、判断题三个大题目，多选题需注明错、漏、多选均不得分。
并留出相应的题目位置，单选题30题(A5:C34)，多选题40(A36:C75)，判断题30题(A77:C106)。
用“自选图形/基本形状”中的棱台画一个按钮，选中在名称框中输入“出题按钮”4字回车，把它命名为“出题按钮”。
再右击此按钮选择“添加文字”，在按钮上输入“出题”2字。
同样再画一个按钮，把它命名为“评分按钮”，添加文字“评分”。
(如图2)图23.显示题目在A5输入公式=INDIRECT("单选题!R"&ROW()-3&"C"&COLUMN(),0)，选中A5复制，再选中A5:C34进行粘贴。
同样在A36输入公式=INDIRECT("多选题!R"&ROW()-34&"C"&COLUMN(),0)并复制到A36:C75，在A77输入公式=INDIRECT("判断题!R"&ROW()-75&"C"&COLUMN()并复制到A77:C106。
在E4单元格输入公式=IF(D4=C4,1,0)，这公式用来判断如果D4中的答案与C4的标准答案一致就得1分否则为0分。
A5的公式表示对单选题工作表中同列、行数差3的单元格(A2)的引用，公式中使用了R1C1格式的单元格编号，其中3、34、75是由第一题所在的行数减2得来。
基于Excel开发窗体版模拟考试系统实例与技巧
考试系统考生登录题型选择单选题多选题判断题交卷评分图1 模拟考试系统功能框架图图2 模拟考试系统结构图图3 sheet2 表数据结构图4 sheet3 表数据结构基于E x ce l开发窗体版模拟考试系统实例与技巧高智超张志揆摘要：在考试系统的开发过程中，常用VB、JavaE E 等软件开发，对小微型考试系统多用Excel办公软件开发。
从实用性出发，用熟悉的Excel 开发了一个小微型的模拟考试系统，骤简单。
方便实用，步关键词：Excel；窗体考试系统；开发实例技巧对于考试系统的开发，可以选择的开发工具很多，笔者曾用Visual Basic 6.0 开发了一套考试系统，也曾用JavaEE 开发了在线考试系统。
虽然开发出的软件实用性很强，但是开发过程相对要艰难和复杂，开发周期较长，不论是VB 还是JavaEE都要配置数据源，与数据库进行连接，JavaEE 开发网站式考试系统时考试环境的配置较烦琐。
而Excel 作为优秀的电子表格软件，不仅具有强大的表格数据处理功能，并且Excel 提供了二次开发的环境，直接调用Excel 表格中的数据，就可以编写出功能强大的考试系统，进行无纸化考试。
虽然Excel 开发的考试系统较简单，但是开发周期短，短小精悍，对于人数不多的无纸化考试，省去了考试环境的安装与配置，既可以完成的系统结构图如图 2 所示：应用于公司短期培训考试，实用。
也可以进行教学单元测试，方便2 数据库用一个Excel 文件完成模拟考试系统的开发，新建一个名为“模拟考试系统”的Excel 文件。
其中Sheet1 表格不存放数下面以进行模拟考试系统开发的具体过程，来详细说明Excel 开发窗体系统的实例和技巧。
具体开发步骤由功能结构分析、数据库设计、窗体界面设计、试题库准备、测试考试等组成。
代码设计、据，作为考试时的激活工作表。
Sheet2 里面保存试题、答案、按顺序保存每个考生答题结果及得分，每个考生占两列。
excel制作网络考试考试调查好帮手
考试调查好帮手:用Excel打造网络考试系统编制试卷第一步，建立题库首先新建一个题库工作表，将本次考试所有备用的标准化试题（单选、多选和判断）添加进去。
如果要防止作弊设置A卷和B卷，需将题号、题目和选项都放置在不同的单元格，以便于调整题目和选项的顺序。
第二步，建立试卷然后根据考试的要求，设置试卷的眉头，准考证号和姓名由学生自己输入，而试卷类型则由教师设置，为了不让学生随意修改试卷类型，这里需要执行“数据→数据有效性”命令，设置数据区域的有效性条件为“A卷”。
由于每道题目的长度不尽相同，可将A列单元格作为考生答题区域，同样需要利用“数据有效性”对话框，设置学生只能输入A、B、C、D等选项内容，并提供下拉菜单，以便于考生答题。
在B列单元格中设置试题序号。
第三步，出题然后在C7单元格中插入字符串连接函数“=CONCATENATE(设置题库!C2,"▲A.",设置题库!D2," ▲B.",设置题库!E2," ▲C.",设置题库!F2," ▲D.",设置题库!G2)”，从“设置题库”工作表中提取试题内容，为了便于学生阅读试题，可在题目和选项之间适当地添加一些醒目的分隔符号（见图1）。
题库工作表与试卷工作表第四步：调整试卷为了方便试卷生成和答案提取工作，可以将每一道题目的全部内容都设置在同一行，如果题目中有图，还可以插入对应的题目后面，并做相应标识。
通过适当增加行高、设置底纹或加粗字体的方法来改善阅读效果。
将该工作表内容复制粘贴到一个新的工作表中（注意要用“选择性粘贴→数值”，去掉所有的公式引用），将其保存到“测试一A卷”文件夹下，名称为“测试一.xls”，试卷就生成了。
适当调整题号和选项顺序，很快就可以生成B卷。
分发收取试卷第一步，分发试卷学校的网络机房都安装有电子教室软件，这里以较为常用的极域电子教室为例，来讲解试卷文件的分发和收取方法。
利用excel vba制作多选题考试系统
利用excel vba制作多选题考试系统面对大量的选择题考试，如果印刷纸质试卷，考完后由教师人工阅卷，不但效率低下，而且浪费人力、物力，还很容易出错。
即使学校有条件使用机读卡考试，也会提高成本，浪费财力。
我们利用excel vba制作了选择题考试系统，使用方便，节约人力、物力，深受广大教师的欢迎。
下面我以多选题为例介绍一下具体做法，供读者参考。
一、界面设计启动exce12003，把sheetl更名为“多选题”，sheet2更名为“多选题库”，在“多选题”中输入相应的内容，把窗口右上角的“垂直拆分块”拖动到第五行的下边缘，再点击“窗口一冻结窗格”。
两个按钮以后再添加，如图1所示。
把题目录入到“多选题库”中，其中第一行为字段名，在al -hl中分别输入：章、题号、答案、题干、a. b. c.d。
第二行以下为题目，如图2所示。
录入完毕后统计一下题目总数（我这里共录入了30 3道题，考试抽取20道题，考试时间共3 0分钟），在“多选题”的下列单元格中分别输入内容（ol：总题数、pl：303. 02：抽题数、p2：20. 01：考试时间（分钟）、q2：3 0）。
选择“工具一保护一允许用户编辑区域”，把b2. d2. h5放入其中。
至此，准各工作基本完毕。
二、代码编辑限于篇幅，以下只介绍代码编辑中的技术性问题，详细请参阅http：／／ ／413660998?ptlang=2052。
按alt+fll键，进入vba编辑界面，按ctrl+r显示“工程资源管理器”窗口，按f4显示“属性”窗口。
1．启动代码简介双击“microsoft excel中对象”中的“thisworkbook”，在右侧窗口中输入代码。
这部分代码触发workbook_open()事件，主要有三项任务。
其一是利用“worksheets（”多选题库”）．visible：xlsheethidden”隐藏题库；其二是清除上一名考生保存的信息；其三是利用msgbox语句给出“考试说明和答题注意事项”。
用EXCEL制作模拟考试系统
1.建立题库打开Excel 2010，建立“模拟考试系统-出题测试版”。
打开此工作簿，建立“单选题”工作表(如图1)，在A2输入公式=ROW()-1&"."以自动生成序号，在D2输入=IF(C2="","",RAND())，选中A2:D2拖动向下填充几百行。
按住Ctrl键单击“单选题”工作表标签拖动复制出两份，分别重命名为“多选题”（如图2）、“判断题”（如图3），分别输入题目和答案，按Alt+回车键换行。
请注意以下提示：1、以上3个工作表，在B列输入单选题题目（样式随意，但一道题只能占一个单元格），在C 列输入对应考题的答案，答案输入时注意不要有多余字符。
2、“多选题”工作表的答案必须按ABCD的顺序填写，例如答案ABD，不能写ADB、BAD、BDA、DAB、DBA，答错、少答和多答均不得分；“判断题”工作表的答案只能有两种，本题按“正确”和“错误”作为答案，其他形式如“对”和“错”、“√”和“×”也可以。
3、题库中题目数量根据实际情况而定，多多益善。
本例中题库数目为单选题60道、多选题50道、判断题45道。
图1图2图32.建立考生名单新建“考生名单”工作表，在A、B、C列分别输入序号、准考证号、考生姓名，选中B列在名称框中输入“考号”，回车确定把B列命名为考号(如图4)。
完成后可在名称管理器内看到名字为“考号”的名称，引用位置为“考生名单”工作表的B列。
图43.设计试卷建立“试卷”工作表，按需要设置试卷，序号生成方式如题库序号。
单选题30题(A5:C34)，多选题40(A36:C75)，判断题30题(A77:C106)。
在B4输入“单选题（每题1分）”，在B35输入“多选题（每题1分，错、漏、多选均不得分）”，在B76输入“判断题（每题1分）”。
用“自选图形/基本形状”中的棱台画一个按钮，选中在名称框中输入“出题按钮”4字回车，把它命名为“出题按钮”。
维护考试系统——用Excel2007轻松制作考试系统（十）
维护考试系统——用Excel2007轻松制作考试系统（十）三、维护考试系统1. 试题输入在前面做好的“ 单选题” 、“ 多选题” 、“ 判断题” 工作表中输入试题和答案即可，需要换行时按“ Alt+ 回车键” 输入软回车符换行，用空格进行水平定位。
答案输入时注意不要有多余字符，特别是多选题一定要按ABCD 的顺序输入多选项，否则无法正确评分，还可以对C 列单元格设置有效性。
若以后还想用到当前的题目顺序可在最后增加一列（E 列）填充序列号，需要时按此列排序即可。
在“ 考生名单” 工作表中输入考生姓名和准考证号，也可以直接从其他工作表中复制过来（若已经有的话）。
2. 隐藏工作表在实际操作中，除试卷外的其他工作表也需要隐藏起来以免考生看到，方法如下：在功能区中打开“ 开发工具” 选项组，选择“ 宏” 选项，在弹出的窗口左侧选中要隐藏的工作表名，如“ 单选题” 工作表，在属性窗口中（若看不到左侧的属性窗口可按F4 键显示）把“ Visible ” 项的值设置为“ 0 - xlsheetHidden ” ，如图10 所示，即可隐藏该工作表。
重复这一操作把除“ 试卷” 以外的其他工作表全部隐藏起来。
以后需要显示时只需按这一操作过程把“ Visible ” 项的值修改为“ - 1 - xlsheetVisible ” 即可。
图10为防止学生修改，还要在左侧“ 工程-VBAProject ” 窗口中右击“ VBAProject （考试系统. xlsx) ” 后选择快捷菜单命令“ VBAProject - 工程属性” ，在“ 保护” 选项卡中选中“ 查看时锁定工程” ，并输入和确认密码，如图11 所示，单击“ 确定” 退出。
经过这样的设置以后，没有正确的密码就不能修改内容了。
图11 工程-VBAProject本文来至E学院原文地址：本文来至E学院原文地址：。
用ECEL制作模拟考试系统
1.建立题库打开Excel 2003，建立“单选题”工作表(如图1)，在A2输入公式=ROW()-1&"."以自动生成序号，在D2输入=IF(C2="","",RAND())，选中A2:D2拖动其填充柄向下复制到其他单元格，大概有几百行也就够了，剩下的需要时再复制。
按住Ctrl键拖动工作表标签复制出两份，分别重命名为多选题、判断题。
图12.设计试卷建立“试卷”工作表，你可以按需要设置试卷，并输入单选题、多选题、判断题三个大题目，多选题需注明错、漏、多选均不得分。
并留出相应的题目位置，单选题30题(A5:C34)，多选题40(A36:C75)，判断题30题(A77:C106)。
用“自选图形/基本形状”中的棱台画一个按钮，选中在名称框中输入“出题按钮”4字回车，把它命名为“出题按钮”。
再右击此按钮选择“添加文字”，在按钮上输入“出题”2字。
同样再画一个按钮，把它命名为“评分按钮”，添加文字“评分”。
(如图2)图23.显示题目在A5输入公式=INDIRECT("单选题!R"&ROW()-3&"C"&COLUMN(),0)，选中A5复制，再选中A5:C34进行粘贴。
同样在A36输入公式=INDIRECT("多选题!R"&ROW()-34&"C"&COLUMN(),0)并复制到A36:C75，在A77输入公式=INDIRECT("判断题!R"&ROW()-75&"C"&COLUMN()并复制到A77:C106。
在E4单元格输入公式=IF(D4=C4,1,0)，这公式用来判断如果D4中的答案与C4的标准答案一致就得1分否则为0分。
A5的公式表示对单选题工作表中同列、行数差3的单元格(A2)的引用，公式中使用了R1C1格式的单元格编号，其中3、34、75是由第一题所在的行数减2得来。
wps表格怎样制作考试系统
wps表格怎样制作考试系统wps表格的功能是强大的，我们可以使用wps表格来制作考试系统，相信很多人都不知道怎样制作，下面就让店铺告诉你wps表格怎样制作考试系统。
wps表格制作考试系统的方法1.制作试题工作表1.1表头设计表头，一般位于工作表的左上部，对整个工作表有重要的导航作用，如图1所示。
第1步：新建工作薄。
新建一个名为“WPSKSXT”的工作薄，为保证它能在EXCEL下兼容运行，可保存为XLS文件。
默认地，该工作薄包含了Sheet1、sheet2、sheet3等工作表。
为使考试系统更加简洁，可删除sheet2、sheet3，只在sheet1中工作即可。
创建考试系统绝非一时半刻之事，为避免停电、系统故障等的影响，请将“WPS表格”自动备份文件的时间设置得短一点：单击“工具→选项→常规与保存”即可进行修改。
选择5分钟左右为宜。
第2步：让表头恒显。
考试系统设置完毕后，要显示的只有A、B、C、E列，为此，可选中F9，再单击“窗口→冻结窗格”。
这样，无论如何表格有多宽多高，F9左上角的表头部分将恒显不变。
1.2单项选择题设计本考试系统中，单项选择题共5道，每题4分。
充分利用好选项按钮、分组框、列表框、组合框等窗体即可构建出单项选择题。
实测表明，在同一工作薄中过多地运用选项按钮、列表框、组合框后，这些窗体的响应速度很慢。
为此，本系统只包含5道单项选择题且用不同的窗体来构建。
1.2.1.用选项按钮构建单项选择题本例中，我们将用选项按钮来构建1、2两题。
第1步：单击“视图→工具栏”，勾选其下的“窗体”，让窗体工具栏显示出来。
第2步：在窗体工具栏里单击“选项按钮”工具后，在B11单元格里按住鼠标左键拖动即可画出一个选项按钮。
接着，右击选项按钮，从弹出的快捷菜单中单击“编辑文字”，将其中的默认文字删除再输入大字的字母A。
接着，尽量缩小选择按钮，将其摆放到B11单击格的正中位置。
如图2所示。
同理，分别在B12、B13、B14单击格里插入选项按钮B、C、D。
利用EXCEL 设计试卷生成系统
中的 记 录 可 以采 用两 种 方 法 录 入 ： １ 直接 手 工 录入 ： 、 打开 上 作 簿 ， 题 库 工 作 表 中可 以直 接 输 在
、
系统可 实现功 能
如果不 同就直接记入数组 ｉ（ ， ｄ ）如果有相 同的重新再 生 ３ 题库 中试题 内容 与参 考答案融 为一体 ， 、 由系统生成 的试 别 比较 ， 成， 然后再 比较 ， 如此循环。 卷文档既可以打印出学生考试用卷 ， 也可 以打印出样卷。
二 、 建 题 库 构
维普资讯
利用 Ｅ ＣＥ Ｌ设 计试 卷 生成 系统 Ｘ
Ｄｅ ｉｎＳｅ ｔ ｇ Ｓｙ ｔ ｓｇ ｔｉ ｓｅｍ ｏ ｈ ｓ ｎ ｆ ｒ ｅＴｅ ｔＰａｐ ｔ ｔ ｅｒ ｈ ＥＸＣＥＬ ｗｉ
张 朝 辉
本系统 的随机数 主要是 标志 出现在试 卷 中题 库记 录的位 作为一名老师 ， 经常要 经历考试 、 出卷这个过程。 虽然“ 无纸 例如我们 随机产 生了一个数 ９ ， ９ 表示题库 中第 ９ ９条记录是 化” 考试 已经开始被大家所了解 ， 但真正实现的学校却 不多 。作 置 ， 关 一是 生成 的数不能重 为一名信息技术老师 ，我希望能够利用计算机开发一套简单实 我们试卷 中的一个题 目。 于随数 的要求 ： 避免试卷中出现重题 ； 二是生成的数必须在给定 的范围内产 用、 可以 自动生成试卷的系统 ， 把大家从繁琐的出卷过程 中解放 复 ， 出来 。其实利用 Ｅ Ｃ Ｌ就可以轻松帮你完成 。 ＸＥ
该 界 面 下 用 户 只要 在 Ｂ列 相 应单 元 格 中输 入 每 个 章 节 的 题 目 数 （ 出题的章节后 面为空 白 ）然 后按 “ ｔ＋ ” 没 ， Ｃｒ Ｄ 组合键 执行宏 ｌ 命 令 就 可 以生 成试 卷 。其 中此 界 面 除 Ｂ列外 其 余 各 列 都 设 置 为 保护状态 ，以避免用户 的误操作影响程 序的执行 。可以在 Ｄ、 Ｆ （ ） 制记 录 到 Ｓ Ｅ ２中 １复 ＨＥ Ｔ
用Excel VBA设计考试信息系统
用Excel VBA设计考试信息系统摘要高校学生期末考试,如果每场考试都采取随机座次,并且直到入考场时学生才知道自己的座次,学生就没有机会提前设计协同作弊。
但是用手工方式实现每场考试随机安排座位,工作量大,效率低下。
使用Excel制作一个考试信息系统,能完美的完成这项工作。
关键词Excel VBA;随机;信息系统1 实际工作中的问题与需要高校学生一般都安排集中期末考试,考试都是各专业单独组织考场,考生都是平时在一起学习的同学。
如果座次直接按照学号,可以方便监考老师检查考生到场情况,但是一直是一样的座次不变,固定考生相邻的时间长了,会出现协同作弊的现象,甚至出现雷同卷。
虽然可以通过监考老师加强监视力度来避免,但是最好用技术的方法来解决。
如果打印出学生学号姓名清单,随机贴到座位上,但是每场考试都贴标签,太麻烦,而且学生不容易找到自己的座位。
后来采用当场抽签的办法,制作两份号码标签,一份贴到考试座位上,另外一份让考生抽签,抽到后对号入座,这种方法虽然能够实现随机排坐,但是太费时间,监考教师手里没有座次表,学生可以趁乱自己换标签调座,另外如果有缺考的学生,难以查找登记。
最后,我们决定还是使用计算机,进行考场安排,以达到事半功倍的效果。
该设想是考场里座位上只贴号码,有N个座位则号码从1～N。
考试前半小时随机产生考生座次表,考试前10分钟在考场门口张贴一张座次表,此表按学号排序,考生可快速查到自己的座位号。
监考教师领一份座次表,此表按座位号排序,监考教师可快速查到每个座位上的考生,对缺考考生快速查找登记。
2 解决问题的思路我们借助Excel电子表格实现这个工作。
首先制作出学生清单,包含学号、姓名、性别等几列,并填入实际数据。
添加一列用来产生随机数,添加另外一列,用来产生座次号。
具体方法如下,在随机数一列第一单元格插入函数rand(),或者直接输入“=rand()”,把这一单元格内容复制到此列其他单元格,或者使用快速填充。
在答卷中显示试题——用Excel2007轻松制作考试系统（六）
在答卷中显示试题——用Excel2007轻松制作考试系统（六）在答卷中显示试题——用Excel 2007 轻松制作考试系统（六）2009-11-02 17:383. 在答卷中显示试题① 在A5 单元格输入公式“ = INDIRECT(" 单选题! R"&ROW() - 3&"C"&COLUMN (),0) ” ，选中A5 单元格并复制，再选中区域A5:C34 进行粘贴。
② 在A36 单元格中输入公式：“ = INDIRECT(" 多选题! R"&ROW() - 34&"C"&COLUMN(),0) ” 并复制到区域A36:C75 。
③ 在A77 单元格输入公式“ = INDIRECT(" 判断题! R"&ROW() - 75&"C"&COLUMN(),0) ” 并复制到区域A77:C106 。
④ 在E4 单元格输入公式“ = IF(D4=C4,1,0) ” ，这个公式用来判断D4 中的答案与C4 的标准答案是否一致，一致就得1 分，否则为0 分。
这里说明一下，A5 的公式表示对单选题工作表中同列、行数差3 的单元格( A2) 的引用，公式中使用了“ R1C1 ” 格式的单元格编号，其中3 、34 、75 是由第一题所在的行数减2 得来。
这个公式实现的是绝对位置引用，即不管在单选题工作表中进行插入、删除行或排序，A5 显示的始终都是你从单选题A2 中直接看到的内容。
因此A5:C34 、A36:C75 、A77:C106 三个区域将分别与相应题库中最前面的30 （或40 ）个题的内容保持一致。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
1.建立题库打开Excel 2010，建立“模拟考试系统-出题测试版”。
打开此工作簿，建立“单选题”工作表(如图1)，在A2输入公式=ROW()-1&"."以自动生成序号，在D2输入=IF(C2="","",RAND())，选中A2:D2拖动向下填充几百行。
按住Ctrl键单击“单选题”工作表标签拖动复制出两份，分别重命名为“多选题”（如图2）、“判断题”（如图3），分别输入题目和答案，按Alt+回车键换行。
请注意以下提示：1、以上3个工作表，在B列输入单选题题目（样式随意，但一道题只能占一个单元格），在C 列输入对应考题的答案，答案输入时注意不要有多余字符。
2、“多选题”工作表的答案必须按ABCD的顺序填写，例如答案ABD，不能写ADB、BAD、BDA、DAB、DBA，答错、少答和多答均不得分；“判断题”工作表的答案只能有两种，本题按“正确”和“错误”作为答案，其他形式如“对”和“错”、“√”和“×”也可以。
3、题库中题目数量根据实际情况而定，多多益善。
本例中题库数目为单选题60道、多选题50道、判断题45道。
图1图2图32.建立考生名单新建“考生名单”工作表，在A、B、C列分别输入序号、准考证号、考生姓名，选中B列在名称框中输入“考号”，回车确定把B列命名为考号(如图4)。
完成后可在名称管理器内看到名字为“考号”的名称，引用位置为“考生名单”工作表的B列。
图43.设计试卷建立“试卷”工作表，按需要设置试卷，序号生成方式如题库序号。
单选题30题(A5:C34)，多选题40(A36:C75)，判断题30题(A77:C106)。
在B4输入“单选题（每题1分）”，在B35输入“多选题（每题1分，错、漏、多选均不得分）”，在B76输入“判断题（每题1分）”。
用“自选图形/基本形状”中的棱台画一个按钮，选中在名称框中输入“出题按钮”4字回车，把它命名为“出题按钮”。
再右击此按钮选择“添加文字”，在按钮上输入“出题”2字。
同样再画一个按钮，把它命名为“评分按钮”，添加文字“评分”。
(如图5)图54.显示题目（如图6）在B5输入公式=INDIRECT("单选题!R"&ROW()-3&"C"&COLUMN(),0)，复制到B5:C34（可拖动A5填充）。
在B36输入公式=INDIRECT("多选题!R"&ROW()-34&"C"&COLUMN(),0)并复制到B36:C75。
在B77输入公式=INDIRECT("判断题!R"&ROW()-75&"C"&COLUMN(),0)并复制到B77:C106。
在E5单元格输入公式=IF(D5="",0,IF(D5=C5,$G$2,0))，向下填充到E34，这公式用来判断如果D5中的答案与C4的标准答案一致就得1分否则为0分，其中G2单元格内数值为1。
同理，在E36单元格输入公式=IF(D36="",0,IF(D36=C36,$H$2,0))，向下填充到E75；在E77单元格输入公式=IF(D77="",0,IF(D77=C77,$I$2,0))，向下填充到E106。
可通过更改G2、H2、I2单元格的数值来更改分值。
B5的公式表示对单选题工作表中同列、行数差3的单元格(B2)的引用，公式中使用了R1C1格式的单元格编号，其中3、34、75是由三种题型的第一题所在的行号减2得来。
这公式实现的是绝对位置引用，即不管在单选题工作表中进行插入、删除行或排序，B5显示的始终都是你从单选题B2中直接看到的内容。
因此B5:C34、B36:C75、B77:C106三个区域将分别与相应题库中最前面的30(或40)题的内容保持一致。
图65.答案限制选中单选题答题区D5:D34单击“数据/有效性”（快捷键ALT+D→L），在“允许”中选择“序列”，选中“提供下拉箭头”复选项，在“来源”中输入“A,B,C,D”，不含引号且其中逗号为半角格式(如图7)。
切换到“出错警告”选项卡，输入错误信息为“只能输入A、B、C、D中的一项，其他任何符号或空格均为非法。
”，选中“输入无效数据时显示警告”复选项，选择样式为“停止”(如图8)，确定完成设置。
图7图8同样对多选题答题区D36:D75，判断题答题区D77:D106设置数据有效性，只是“来源”要分别换成“A,B,C,D,B,AC,AD,BC,BD,CD,ABC,ACD,BCD,ABCD”和“正确,错误”。
多选题的“出错警告”一定要改成“必须按ABCD的顺序输入多选项，否则无法正确评分”。
（如图9到如图11）图9图10图116.准考证号验证选中“试卷”工作表中要输入准考证号的D2单元格，单击“数据/有效性”，在“允许”中选择“系列”，取消“提供下拉箭头”复选项，在“来源”中输入=INDIRECT("考号")（如图12）。
切换到“出错警告”选项卡，输入错误信息为“你输入的准考证号并不存在，请重新输入”，选中“输入无效数据时显示警告”，并设置样式为“停止”（如图13）。
图12图13在F2单元格输入公式=IF(D2="","",VLOOKUP(D2,考生名单!$B:$C,2,FALSE))，在D2单元格输入准考证号后会自动显示考生姓名。
（如图14）图147.随机抽题右击“出题”按钮，选择“指定宏”，在弹出窗口中，输入宏名为“出题”，位置选择当前工作簿，单击“新建”按钮，复制如下代码粘贴到框内，结果如图15，保存时将文件另存为启用宏的.xlsm 格式。
Sub 出题()If Range("D2").Value = 0 Then提示 = MsgBox("请先输入准考证号")GoTo 重来End If'如果D2为空则弹出提示要求输入准考证号并直接跳到后面的"重来:"处。
Sheets("单选题").Range("A:D").Sort Key1:=Sheets("单选题").Range("D2"), Order1:=xlAscending, Header:=xlGuessSheets("多选题").Range("A:D").Sort Key1:=Sheets("多选题").Range("D2"), Order1:=xlAscending, Header:=xlGuessSheets("判断题").Range("A:D").Sort Key1:=Sheets("判断题").Range("D2"), Order1:=xlAscending, Header:=xlGuess'这三行分别是对单选、多选和判断题工作表的A:D区域按D列随机数升序排序。
Columns("B:B").Rows.AutoFit'对B列设置最适合行高，以完整显示题目。
Range("D5").Select'定位到D5以便输入答案ActiveSheet.Shapes("出题按钮").Visible = False'隐藏出题按钮以防重复选题ActiveSheet.Shapes("评分按钮").Visible = True'显示评分按钮重来:End Sub图15试卷中的题目总是显示各题库最前面的N题，而在此对各题库按随机数进行随机排序后最前面的N题自然是随机的，也就相当于是随机抽题了。
8.成绩记录表新建“成绩记录”工作表(如图16)，在A2输入公式=NOW()，并选中A列右击从“设置单元格格式”中设置为日期格式以显示当前时间。
在B2输入公式=试卷!D2和C2输入公式=试卷!F2以显示相应数据。
D2输入公式=SUM(E2:G2)对后面三个得分进行合计，E2、F2、G2则分别输入公式=SUM(试卷!E5:E34)、=SUM(试卷!E36:E75)、=SUM(试卷!E77:E106)分别对相应题型得分进行合计。
图169.评分和记录保存右击“评分”按钮，选择“指定宏”，输入宏名“评分”，位置选择当前工作簿，单击“新建”按钮，复制如下代码粘贴到框内，结果如图17:Sub 评分()Sheets("成绩记录").Rows("3:3").Insert Shift:=xlDown'在成绩记录工作表第3行前插入一行Sheets("成绩记录").Rows("2:2").Copy'复制成绩记录工作表第2行Sheets("成绩记录").Range("A3").PasteSpecial Paste:=xlPasteValues'以数值方式粘贴到成绩记录工作表A3得分 = MsgBox("最终得分" & Range("成绩记录!D2").Value & " 其中:单选题" & Range("成绩记录!E2").Value & "、多选题" & Range("成绩记录!F2").Value & "、判断题" & Range("成绩记录!G2").Value, , "评分结果")'弹出信息框显示成绩记录!D2、E2、F2、G2的数据，标题为"评分结果"Range("D2,D5:D34,D36:D75,D77:D106").ClearContents'清除试卷工作表中输入的内容Sheets("试卷").Rows("3:500").RowHeight = 0Sheets("成绩记录").Rows("2:2").RowHeight = 0'设置题目区行高为0，以隐藏所有题目ActiveSheet.Shapes("出题按钮").Visible = TrueActiveSheet.Shapes("评分按钮").Visible = False'显示出题按钮,隐藏评分按钮ActiveWorkbook.Save'保存End Sub图1710.其他设置选中A4单击“窗口/冻结空格”以始终显示1:3行的标题和按钮。