基于VBA的教学小结表自动填写技术

2010-07-21 09:35邓建华李燕苏州科技学院215011

中国科技信息 2010年7期

邓建华李燕苏州科技学院 215011

1.引言

高校教师在每学期结束时都要按照要求对学生课程考核成绩进行统计、分析，并对课程教学过程与效果进行总结，填入课程教学小结表。一般的课程教学小结表是Word文档，Word的数据处理能力不如Excel强大，教师在学生考核成绩统计分析时需先要在Excel表中进行[1,2]，然后再手工复制到课程小结表中，重复和繁琐的手工操作很容易导致出错。

针对上述问题，这里提出应用VBA编写一段宏编码实现Excel学生考核成绩分析结论分析数据自动填入到课程教学小结表的技术。

2.VBA语言环境与对象模型

2.1 VBA语言环境

VBA是一种最好的微软通用应用软件脚本语言，包含在Office应用软件中，所以通过VBA脚本语言对Office各模块基本功能进行扩展以更好地为教学管理提供帮助，提高工作效率。

VBA脚本语言[3]与以前版本的XLM宏语言不同，VBA代码更容易阅读和理解。VBA语言的基础是Visual Basic语言，具有易学可移植的特点；VBA有一个面向对象的编程环境，它只能处理对象，VBA所支持的各模块对象模型内嵌在Office软件内。

2.1 Excel、Word模块对象模型层次结构[4]

Word和Excel的对象模型是一种层次关系，Excel在主应用程序（Application）对象内包含子对象：工作簿对象（Workbook）、工作表对象（Worksheet）及大量的内部函数对象等100多类；同样VBA几乎可以响应Word对象的每个动作，Word的任何元素如文档表格段落、域及书签等都可以用相应封装入对象。在Word主应用程序（Application）对象中包含了如Document、Windows、Selection等对象。以课程教学小结表自动生成程序段中需要用到的主要对象有：

2.1.1 需要用到的主要Excel模块对象

（1）工作簿（Workbook）对象

一个工作簿（Workbook）对象实际上就是一个Excel文件，如果学生成绩统计分析的文件名是“TEXTANLASYS.XLS”如在该文件中使用课程小结表自动生成的宏，则该文件为当前活动的工作簿（Workbook）对象。

（2）工作表（Worksheet）对象

每个工作簿（Workbook）对象上可以有多个工作表（Worksheet）。在默认情况下，Excel的当前工作簿上有名为Sheetl，Sheet2，Sheet3三个工作表.并且Sheetl为当前工作表。如果想使Sheet3成为当前工作表，则可使用下列语句：

ExcelApp.Worksheets(“Sheet3”).Activate’ExcelApp为Excel.Application对象

（3）单元格（Cell）对象

工作表（Worksheet）对象中的单元格（Cell）。它是以行Row和列Col作为参数的。如下语句可以实现对某位置单元格赋值：

Cell(3,4)=5 ’将第三行第四列(第D列)的单元格赋值5。

2.1.2 需要用到的主要Word模块对象

（1）Document对象

一个Document对象就表示一个Word文档，如要在VBA中通过Excel程序打开当前目录下需要填写分析数据的课程教学小结表Word文档“kcxj.doc”，则可编写语句：

Set WdApp = CreateObject("Word.Application") ’打开Word应用程序

Set aDoc = WdApp.Documents.Open(ActiveWorkbook.Path & "/ kcxj.doc ")’ aDoc代表打开的课程教学小结表文档。

（2）区域（Range）对象

Range对象代表文档中的一个特定范围，在Visual Basic过程中使用Range对象可以定义文档的某一部分，然后对该区域进行一些操作，例如插入文字或应用格式。

（3）表格（Table）对象

Table对象代表选定内容范围或文档中的某个表格。因为在文档中往往有多个表格，往往需要用到表格集合对象加下标的方式来定位，如：使用下列语句可以对当前文档的某个Table对象的某单元格赋值：

aDoc.Tables(1).Cell(3, 2).Range.InsertAfter Sheet2.Cells(2, 2)’表示对aDoc中表格1的第三行、第2列的单元格赋值为当前Excel文件Sheet2中Cells(2, 2)的值。

3.填入课程教学小结表的数据

3.1 数据统计分析结构

课程教学小结表有两个方面的主要作用：一是教师通过总结课堂教学过程中的经验和体会，并在定性评价的基础上对教学设计提出合理化建议。二是教师通过对学生平时、考核成绩的定量统计分析对学生成绩及试卷质量进行评价，获得学生掌握知识程度及优化试卷内容思路。课程教学小结表基本结构除包含课程基本信息等文字描述内容以外，需要定量统计分析的数据结构见图1。

3.2 需要填写的统计分析数据

课程教学小结表主要需填写的统计分析数据有：

（1）授课班级学生平时、考核及总评成绩的各分数段的分布情况及标准差，用表格表示；

（2）试卷分析指标主要包括：题目的难度、可信度等指标，也用表格表示。

这些值事先都要在Excel中计算出来。然后自动从Excel工作表中自动填写到课程教学小结表指定的表格单元格内。

4.Excel统计分析数据自动填入课程小结表的参考编码

一般一套试卷共有大题4～6类，小题多于20题，以往教师手工计算学生考核得分时，往往因为批改试卷量大而比较容易算错，经常会出现多计或少计的情况，这对学生很不公平。现在利用Excel自动计算的功能，教师在批改完某个学生的试卷后，首先在Excel中进行每个学生考核成绩的统计，可以很好的克服上述问题；同样的Excel强大的统计及自编公式功能使教师方便的求均值、标准差及绘制成绩分布曲线图等；

但是，Excel的文字处理及表格表示没有Word灵活，所以大部分高校的课程教学小结表多是Word文档，这就需要把上述Excel表中的分析数据填入到Word文档中，下面就是应用VBA编写的一段宏编码来实现该功能的方法。