基于EXCEL和VBA的自动组卷系统设计与实现

焦乐天 王英迪 焦万合 开赛尔

摘要：论文主要介绍了一款基于EXCEL和VBA的自动组卷系统的设计思路和实现方法。相关内容既可做为EXCEL教学的高阶案例，也可直接用于学校教师或考试管理人员进行试题库管理和试卷拟制工作，以提高考试工作的质量和效率。

关 键 词：EXCEL；VBA；自动组卷系统

中国分类号：TP391 文献标识码：A

Abstract： This paper mainly introduces the design and implementation method of an automatic test paper system based on EXCEL. The relevant content can be used as an advanced case of EXCEL teaching， and it can also be applied directly for schools faculty or managers to manage examination questions and make examination papers， in order to improve the quality and efficiency of the examination work.

Keyword： EXCEL；VBA；automatic test paper system

0 引言

Microsoft Office Excel办公软件功能强大、使用方便、应用广泛，精通运用EXCEL会给日常工作和生活带来极大方便。本文旨在设计研发一款功能丰富且简单易用的，基于EXCEL和VBA的自动组卷系统，而与学界探讨可有效运用Microsoft Office Excel办公软件来提高日常工作效率的途径和方法。

1 系统功能简述

本系统以EXCEL办公软件为平台，并利用包含其中的数据透视表工具和VBA编程工具开发而成（主界面如图1所示）。系统可以自动统计并显示题库中包含的章节、题型名称及不同题型的题量等题库信息；可以便捷选定要出题的章节范围和题型，并根据系统的提示，随意设定每种题型的卷面题量和分值；可时时显示卷面题量和分值，使教师动态掌握试卷的总题量和分值；可以将自动生成的试卷导出到Word字处理软件中进行编辑排版等。

2 界面设计与功能实现

在进行系统设计前需做如下准备工作：一是安装包含EXCEL 2007的MS OFFICE 2007办公软件系统。二是在EXCEL 2007运行界面，单击“Office 按钮” ，而后单击“EXCEL选项”，在弹出的“EXCEL 选项”界面中，点击选中 “在功能区显示‘开发工具选项卡”复选框，以方便利用VBA进行系统设计与编程。三是建立一个EXCEL试题库工作薄。工作薄中建一个名为“试题库”的工作表，表中有题型、章节、难度、题干、选项（本例假设选择题最多有4个选项）、参考答案、插图名称等字段，并按格式录入试题。试题库界面如图2所示。

系统设计可分5步实现，具体描述为：

第一步：增加用于界面设计的工作表。新建一个工作表作为组卷系统的主界面，并将表命名为 “自动组卷”。在“视图”功能选项栏的 “显示/隐藏”组中，点击取消标尺、网格线、编辑栏、消息栏的选择，从而使界面更加简洁大方，更接近习惯上的应用程序界面（这项工作也可在系统开发完成后展开，并可进一步最小化功能区）。

第二步：插入并设置用于统计显示题型、章节、题量信息的数据透视表。在“插入”选项卡的“表”组中，单击“数据透视表”下的“数据透视表”选项，激活“创建数据透视表”对话框。在“选择一个表或区域” 下的“表/区域”框中键入试题库数据所在的区域或表名引用，也可单击后面的“压缩对话框”图标隐藏对话框后，在工作表上选择相应的区域（本例为“试题库！$A$1：$L$294”）。在“选择存放数据透视表位置” 下选择“现有工作表”，并在“位置”后的文本框中键入存放数据透视表位置（本例为“自动组卷！$B$2”），单击“确定”返回主界面。一个空的数据透视表已添加到您输入的位置，而且显示数据透视表字段列表。分别将“选择要添加到报表的字段”中的“题型”、“章节”和“题干”3个字段选中、继而拖到“行标签”、“列标签”和“数值”下的区域中，关闭“数据透视表字段列表”窗口，一个包含本题库中所有章节、题型及数量信息，并可选择查看任意题型、章节题量的数据透视表建立完成，再将计数项及行、列标签的内容分别修改为“请选择章节”、“请选择题型”和“全部”，使系统更加友好直观（如图1左上角所示）。

第三步：添加用于设置试卷题型、题量的功能区。在数据透视表后插入2个字段（如图1所示），将标题命名为“拟出题量”和“卷面分值”，用于组卷时输入所选题型在试卷中的题量和分值。底部输入显示“试面题量”和“卷面总分”的公式（限于篇幅，公式设计和实现在此则不做赘述）。

第四步：插入并设置用于显示试题及答案的分组框和文本框。点击“开发工具”，选择插入“分组框”控件。按鼠标右键，在适当位置拖画出一个显示试题的分组框，并将标题重命名为“试题”。重复上述过程，在适当位置画出“答案”分组框。而后在2个分组框的上面插入2个文本框控件Textbox1和Textbox2，用来显示试卷的试题和答案。将文本框的Multiline属性设置为True。

3 系统的使用

在“自动组卷”界面上，依次点击“请选择章节”和“请选择题型”下拉列表框，选择出题的范围和题型。此后，即在对应题型后面的表格中输入每种题型的“拟出数量”和“卷面分值”。单击“自动组卷”命令按钮，系统会根据设定的章节范围、题型、题量、分值要求，自动从试题库中选题生成试卷，并将试题和答案分别显示在系统界面的文本框中，以供预览。确认试题满足考试要求后，点击“导出到WORD”命令按钮，系统会自动将试题和答案导出到指定位置并以“课程名称+（组卷时间）”命名的Word文件中。打开上述文件，进行必要的编辑排版后，打印输出便可。

4 结束语

综上可知，本文仅就“自动组卷”系统中组卷功能模块的设计思路和实现方法进行了重点阐述。其他如图3所示，研究中可进一步实现试题逐一显示、修改、删除、增加等题库维护功能的窗体模块设计与功能拓展虽并未在文中提及，但可作为后续研究的推介论题方向。如此，系统功能将更加强大和完善。

参考文献：

[1]罗刚君.Excel VBA范例大全[M]. 北京：电子工业出版社，2008.

[2]孙成玉.Excel数据处理全能手册[M].北京：中国铁道出版社，2009.

[3 ]Excel Home. EXCEL函数与公式实战技巧精粹[M].北京：人民邮电出版社，2008.