用Excel2007轻松制作考试系统_第1页
用Excel2007轻松制作考试系统_第2页
用Excel2007轻松制作考试系统_第3页
用Excel2007轻松制作考试系统_第4页
用Excel2007轻松制作考试系统_第5页
已阅读5页,还剩15页未读 继续免费阅读

下载本文档

版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领

文档简介

1、-作者xxxx-日期xxxx用Excel2007轻松制作考试系统【精品文档】用Excel2007轻松制作考试系统随着计算机的广泛普及,许多学校越来越多地开始利用计算机辅助建立考试系统,目前市面上这类考试系统很多,但若需使用就必须得购买。其实用Excel2007也可以轻松地制作出一个类似的考试系统,而且根本不需要编程。这样的考试系统同样具备自动出题、验证考号、答题后自动评分、保存记录等功能。如果你有兴趣,并且具备一定的计算机操作技术,对Excel也并不陌生,不妨按下面的流程去试着自己制作一个考试系统(以下讲解基于Excel2007)。一、Excel2007公式和函数基础在本考试系统中要使用较多的

2、公式,而公式又离不开函数,为了能方便地设计出考试系统,首先向大家介绍一下公式和函数的基本使用方法。公式:公式是对工作表中的数值执行计算的等式,以等号“”开头。常量:常量是指在运算过程中不发生变化的量,如数字20以及“月平均收入”等都是常量。函数:函数是预先编写的公式,可以对一个或多个值执行运算,并返回一个或多个值。函数可以简化和缩短工作表中的公式,特别是在用公式执行很长或复杂的计算时。运算符:运算符指一个标记或符号,指定表达式内执行的计算类型。公式可以包括函数、单元格引用、运算符和常量等。等号“”:这是公式开头的符号,不可缺省。函数:如SUM(A1:A5),函数返回值为A1到A5单元格区域中数

3、值之和。引用:指定的某个或者某些单元格中的数据,用单元格地址来指定。如“A2”返回第A列、第2行单元格中的值。常量:直接输入公式中的值。运算符:指明运算类型的符号,如“*”表示将数字乘方,“*”表示相乘。在Excel中有算术运算符、比较运算符、文本连接运算符和引用运算符等类型。(1)算术运算符若要完成基本的数学运算(如加法、减法、乘法等)、合并数字以及生成数值结果,可使用以下算术运算符,具体见下表。(2)比较运算符比较运算符用来比较两个值,结果为逻辑值“TRUE”(真)或“FALSE”(假)。比较运算符见下表。(3)文本连接运算符可以使用与号“&”连接两个或多个字符串,生成一新的字符串

4、,具体如下表所示。(4)引用运算符使用下表中的引用运算符可对单元格区域进行合并计算,具体如下表所示。(5)运算的顺序执行计算的顺序会影响公式的返回值,因此,了解如何确定计算顺序以及如何更改顺序以获得所需结果非常重要。计算顺序:Excel2007中的公式始终以等号“=”开头,这个等号告诉Excel随后的字符组成一个公式。等号后面是要计算的元素(即操作数),各操作数之间由运算符连接。Excel按照公式中每个运算符的特定顺序从左到右依次计算。运算符优先级:如果一个公式中有若干个不同优先级的运算符,则按下表中从上到下的顺序进行运算;如果一个公式中的若干个运算符具有相同的优先级,则从左到右依次计算。Ex

5、cel2007提供了成百上千个函数,不可能也没必要全都掌握,常用的也不是很多,这里介绍一些常用的函数。格式中用方括号括起来的参数项为可选项,要根据情况确定用不用可选项。参数中的省略号表示还可以有若干个类似的选项。(1)ABS函数返回数值参数的绝对值。格式为:ABS(数值表达式)例如,单元格A2中有数值95,单元格B2中有数值-2,函数“ABS(A2*B2)”的返回值为数值190。(2)AND函数仅当所有参数的结果值均为逻辑真(TRUE)时返回逻辑真(TRUE),否则返回逻辑假(FALSE)。格式为:(AND逻辑表达式1,逻辑表达式2)例如,函数“AND(8=4*2,9>6,3*6<

6、42)”先计算出算术运算的结果值,再进行比较运算得出各个表达式的逻辑值(依次为“逻辑真”,“逻辑真”,“逻辑假”),最后判断出结果是FALSE(逻辑假)。(3)AVERAGE函数返回所有参数的算术平均值。格式为:AVERAGE(数值表达式1,数值表达式2)例如,工作表中输入的全是数值数据,函数“AVERAGE(A1:C18)”返回A1、A2A18,B1、B2B18,C1、C2C18一共54个单元格中的数值的算术平均值。(4)COLUMN函数返回所引用的单元格的列标号顺序值。格式为:COLUMN(单元格地址)例如,函数“COLUMN(AE11)”的返回值为AE列的顺序为31,即第31列。(5)C

7、ONCATENATE函数将多个文本字符串者或单元格中的文本数据连接成一个新字符串并显示在一个单元格中。格式为:CONCATENATE(文本表达式1,文本表达式2)例如,函数“CONCATENATE(中国,人民,万岁!)”的返回值是文本字符串“中国人民万岁!”。(6)COUNTIF函数返回某个单元格区域中符合指定条件的单元格数目。格式为:COUNTIF(单元格区域引用,条件表达式)例如函数“COUNTIF(A1:C6,NUMBER>5)”返回A1至C6单元格区域中数字大于或等于5的单元格数目。(7)DATE函数返回指定数值的日期。格式为:DATE(年份,月份,日子)例如,函数“DATE(2

8、007,02,28)”将返回日期数据2007-2-28。注意,输入年份参数时,若是20世纪及以前的则可以只输入后2位数字,也可以输入4位数字;若是21世纪及以后的年份则要输入4位数字。(8)DAY函数返回参数中指定的日期或者引用日期数据单元格中的日子(131)。格式为:DAY(日期表达式)例如,在D1单元格中有日期数据“1988-2-26”,函数“DAY(D1)”将返回26。(9)IF函数对于给出的条件表达式进行逻辑判断,结果若为逻辑真(TRUE)则返回第二个参数的值,判断结果若为逻辑假(FALSE)则返回第三个参数的值。格式为:IF(条件表达式,表达式1,表达式2)例如,假设在单元格C8、C

9、9、C10中分别有数值数据,在单元格D8、D9、D10中分别有文本字符串。函数“IF(A1<>0,SUM(C8:C10),D8&D9&D10)”判断A1的数值是否等于0,若不等于0(即满足表达式的意义,为逻辑真)则计算C8、C9、C10三个单元格中的数值之和并返回,若等于0(即不满足条件,为逻辑假)则返回D8、D9、D10单元格中文本字符的连接结果。(10)INDEX函数返回指定的单元格区域中,由给定的行序号和列序号交叉处的单元格的值或者引用。格式为:INDEX(单元格区域引用,行序号数字,列序号数字)例如,函数“INDEX(A1:D8,5,3)”将返回A1到D8区

10、域中第五行与第三列交叉处的单元格(C5)的值或者引用。(11)INT函数将数值参数的小数部分去掉,且不进行四舍五入,只返回整数部分,称为“取整”。格式为:INT(数值表达式)例如,函数“IN(52.9992)”将返回数值52。(12)ISERROR函数用于测试指定单元格的值是否有错。如果有错,则函数返回逻辑值TRUE,无错则返回逻辑值FALSE。格式为:ISERROR(单元格引用)例如,A3单元格中若显示“#NAME?”,函数“ISERROR(A3)”返回逻辑值TRUE。说明A3有错误。(13)ISNUMBER函数测试参数是否是数值,若是数值则返回逻辑真值TRUE,否则返回逻辑假值FALSE。

11、格式为:ISNUMBER(参数表达式)例如,函数“ISNUMBER(”中国”)”将返回FALSE。(14)LEFT函数从一个文本字符串的第一个字符开始,返回指定数值的子字符串。格式为:LEFT(文本表达式,数值表达式)例如,函数“LEFT(“GDTYWUI”,4)”将返回子字符串“GDTY”。(15)LEN函数返回文本字符串中字符的个数。格式为:LEN(文本表达式)例如,在A5单元格中存有文本数据“KJDU上下左右!”,函数“LEN(A5)”将返回数值11。注意,一个标点符号及空格也要算作一个字符。(16)MAX或MIN函数求出一组数中的最大值或者最小值。格式为:MAX(数值表达式1,数值表达

12、式2)或者MIN(数值表达式1,数值表达式2)例如,函数“MAX(3/2,3,6/3)”将返回数值3.(17)MID函数从一个文本字符串的指定位置开始,返回指定个数的子字符串。格式为:MID(文本表达式,数值表达式1,数值表达式2)例如,在A2单元格中有文本数据“中华人民共和国”,函数“MID(A2,3,2)”将返回文本字符串“人民”。(18)MOD函数返回两数相除的余数。格式为:MOD(数值表达式1,数值表达式2)例如,在A1单元格中有数值123,在A2单元格中有数值12,函数“MOD(A1,A2)”将返回123除以12所得的余数3。(19)MONTH函数返回指定日期或引用单元格中的日期数据

13、的月份(112)。格式为:MONTH(日期数据或日期单元格引用)例如,在A1单元格中有日期数据1988-11-1,函数“MONTH(A1)”将返回月份11。(20)NOW函数返回系统的当前日期和时间。格式为:NOW()例如,假设现在是2007年6月12日晚上8点35分,函数“NOW()”将返回这个年月日和时间2007-6-1220:35。(21)OR函数在给出的所有参数中,当其值均为逻辑假(FALSE)时返回逻辑假(FALSE),只要有一个参数的值为逻辑真则返回逻辑真(TRUE)。格式为:OR(逻辑表达式1,逻辑表达式2)例如,函数“OR(3>2,25<3*8,54<>

14、36+18)”将返回逻辑真(TRUE),因为第一个参数结果为TRUE。(22)RIGHT函数返回从一个文本字符串的最后一个字符开始,向左截取指定个数的子字符串。格式为:RIGHT(文本表达式,数值表达式)例如,在A3单元格中有文本数据“ABSDEFG”,函数“RIGHT(A3,9/3)”将返回字符串“EFG”。(23)ROW函数返回一个引用的行序号,在代码编写中会用到这个函数。格式为:ROW(单元格引用)(24)ROWS函数返回指定的单元格区域或者数组的行数,在代码编写中会用到这个函数。其格式为:ROWS(数组名或者区域引用)例如,函数“ROWS(A1:A258)”将返回258。(25)IND

15、IRECT函数返回由文本字符串指定的引用。此函数立即对引用进行计算,并显示其内容。格式为:INDIRECT(单元格引用字符串,逻辑值)说明:单元格的引用可以包含像A1样式的引用、R1C1样式的引用、定义为引用的名称或对文本字符串单元格的引用。如果不是合法的单元格的引用,函数INDIRECT返回错误值#REF!。逻辑值指明包含在单元格引用中的引用类型。如果为TRUE或省略,单元格引用被解释为A1样式的引用。如果为FALSE,单元格引用被解释为R1C1样式的引用。例如,有如下的工作表数据:函数“INDIRECT($A$1)”将返回25;函数“INDIRECT($A$2)”将返回ABCD。(26)R

16、AND函数返回大于等于0及小于1的均匀分布随机实数,每次计算工作表时都将返回一个新的随机实数。格式为:RAND()说明:若要生成a与b之间的随机实数,可写成RAND()*(b-a)+a的形式;如果要使用函数RAND()生成一随机数,并且使之不随单元格计算而改变,可以在编辑栏中输入“=RAND()”,保持编辑状态,然后按F9,将公式永久性地改为随机数。例如,函数“RAND()”将返回介于0到1之间的一个随机数(变量);函数“RAND()*100将返回大于或者等于0但小于100的一个随机数(变量);函数“RAND()*(10-5)+5”将返回介于5和10之间的随机数。(27)SUM函数返回所有数值

17、参数值的和。格式为:SUM(数值表达式1,数值表达式2)说明:数值表达式可以是直接给出的数值,也可以是单元格引用。(28)SUMIF函数返回符合指定条件的单元格区域内的数值之和。格式为:SUMIF(单元格区域,相加的条件,相加的实际单元格)说明:“单元格区域”中的单元格都必须是数字和名称、数组和包含数字的引用。空值和文本值将被忽略。“相加的条件”的形式可以是数字、表达式或文本。例如,条件可以表示为32、"32"、">32",如果是表达式或文本必须用引号括起来。如果省略参数“相加的实际单元格”则当“单元格区域”中的单元格符合条件时,它们既按条件计算,

18、也执行相加。“相加的实际单元格”与“单元格区域”的大小和形状可以不同。例如,有下列工作表数据:函数“SUMIF(A2:A5,">200000",B2:B5)”在A2至A5区域中判断金额高于200,000元的单元格是A3至A5,返回对应的佣金(B3至B5)之和为64,000元。函数“SUMIF(A2:A5,">200000")”在A2至A5区域中判断金额高于200,000元的单元格是A3至A5,因省略了“实际求和的单元格”参数,故返回A2至A5区域中满足条件的单元格(A3至A5)的金额之和为980,000元。函数“SUMIF(A2:A5,&qu

19、ot;=310000",B2:B3)”返回“单元格区域”中金额等于310,000元的佣金之和为22,000元。(29)TEXT函数根据指定的数值格式将相应的数字转换为文本型数据。(30)TODAY函数返回系统日期。(31)VALUE函数将一个由数字组成的文本字符串转换为数值型数据。(32)WEEKDAY函数返回指定日期所对应的星期几。如果创建带函数的公式,可直接在当前单元格输入,在函数编辑框和单元格中都会显示输入的公式和函数,而利用“插入函数”对话框将有助于输入函数。在公式中输入函数时,“插入函数”对话框将显示在当前单元格的下方,会显示出函数的名称、各个参数、各个参数的说明、函数的当

20、前结果以及整个公式的当前结果,在对话框中单击某个函数会出现该函数的解释。当输入“=”和开头的几个字母或显示触发字符之后,Excel2007会在单元格的下方显示一个动态下拉列表,该列表中包含与这几个字母或该触发字符相匹配的有效函数、参数和名称。然后就可以将该下拉列表中的一项插入公式中。参数可直接从键盘输入,也可引用单元格区域中的数据(见后文“单元格数据的引用”部分),或者用鼠标单击单元格(注意,若要输入多个单元格的数据则要正确输入相应的分隔符号),这要根据实际情况灵活运用。有时需要将某函数作为另一函数的参数使用,这就形成了函数的嵌套。嵌套函数最多可以嵌套64个级别的函数。下面的公式仅在一组数值(

21、A2A5)的平均值小于90时返回0,否则返回另一组数值(D3D7)的和。IF(AVERAGE(A2A5)90,0,SUM(D3D7)AVERAGE和SUM函数嵌套在IF函数中。当嵌套函数作为参数使用时,它返回的值的类型必须与参数使用的类型相同。例如,如果参数返回一个逻辑值TRUE或者FALSE,那么嵌套函数也必须返回一个TRUE或者FALSE。否则,将显示#VALUE!错误信息。引用的作用在于标识工作表上的单元格或单元格区域,并告知Excel在何处查找公式中所使用的数据。通过引用,可以在一个公式中使用工作表不同部分中包含的数据,或者在多个公式中使用同一个单元格的数值,还可以引用同一个工作簿中其

22、他工作表上的单元格和其他工作簿中的数据。引用其他工作簿中的单元格被称为“链接”或“外部引用”。(1)引用的样式单元格引用有以下几种样式:一个单元格的引用就用它的地址标识,如A列第10行处的单元格就可输成“A10”。不连续的单元格引用“,”运算符分隔各单元格,如“A2,A5,B12,D58”。同一行中连续单元格的引用可利用“:”运算符,如在A列第10行到第20行之间的单元格引用就输成“A10:A20”。同一列中连续单元格的引用也可利用“:”运算符,如第15行的A列到G列之间的单元格引用可输入“A15:G15”。某行中的所有单元格引用只需要输入行标识就行了,如第5行中的全部单元格输入“5:5”,第

23、2行到第8行之间的全部单元格则输入“2:8”。某列中的全部单元格引用则只用列标识,如第C列中的全部单元格引用输入“C:C”,第B列到第G列之间的全部单元格引用输入“B:G”。某个单元格区域的引用包括以指定的两个单元格连线为对角线所围成的矩形区中所有的单元格的数据。如第F列第5行到第H列第10行之间的单元格区域引用输入“F5:H10”。引用同一个工作簿中另一个工作表上的单元格区域,需要在单元格区域前面加上工作表的名称和一个感叹号。例如当前工作表是Sheet1,现要引用Sheet2中单元格区域,应输入下面的格式,感叹号的作用是将工作表引用与单元格区域引用分开。“SUM(Sheet2!A2:B10)

24、”这个公式是计算工作表Sheet2中A2到B10单元格区域(包括A2和B10)的数值之和,并显示在工作表Sheet1的当前单元格中。(2)相对引用、绝对引用和混合引用相对引用:公式中的相对单元格引用是基于包含所引用的单元格的相对位置。如果公式所在单元格位置改变(如复制公式到另一单元格),引用地址也随之改变。如果在多行或多列中复制或填充公式,引用会自调整。默认情况下,复制的公式使用相对引用。例如,如果将单元格B2中的公式“=A1”复制或填充到单元格B3,将自动从“=A1”变成“=A2”,因为复制的公式下移了一行,引用的单元格也自动增加一个行标号。绝对引用:公式中的绝对单元格引用总是在特定位置引用

25、单元格,如果公式所在单元格的位置改变,所引用的单元格将保持不变。如果在多行或多列复制或填充公式,绝对引用将不作任何调整。默认情况下,复制的公式使用相对引用,可以将它们转换为绝对引用。例如,如果将前例中的公式输成“=$A$1”,从单元格B2中复制或填充该公式到单元格B3,则在两个单元格中的结果完全一样,都是引用的A1单元格的数据。混合引用:混合引用包括有“绝对列和相对行”或者“绝对行和相对列”两种情况。混合引用采用如“$A1”、“B$”等形式。前者属于“绝对列相对行”引用,后者属于“相对列绝对行”引用。如果公式所在单元格位置改变,则相对引用将改变,而绝对引用不变。如果在多行或多列中复制或者填充公

26、式,相对引用将自动调整,而绝对引用不作任何调整。例如,如果将一个混合引用“A$1”从A2单元格复制到B3单元格,它将自动由“=A$1”调整成“=B$1”,只是列变了而行不变。二、设计考试系统启动Excel2007后,双击工作表标签“sheet1”并将其更名为“单选题”。在“单选题”工作表的A2单元格中输入公式“=ROW()-1&"."”,用以自动生成序号,在D2单元格中输入公式“=IF(C2="","",RAND()”。注意:在单元格中输入任何公式、函数时,所有的标点符号以及运算符号、斜线等均应在英文标点符号状态下输入,否则不

27、被认可。选中A2:D2区域并拖动其填充柄竖直向下复制到其他单元格。至于复制多少行,可由自己确定,够用就行了,并且以后还可以再复制,如图1所示。图1按住Ctrl键并用鼠标拖动“单选题”工作表标签复制出两份,分别重命名为“多选题”和“判断题”。建立“试卷”工作表的简单方法是将标签“sheet2”更名为“试卷”就可以了。按需要设置试题量,并输入单选题、多选题、判断题三个大标题,多选题需注明“错选、漏选、多选均不得分”字样,并留出相应的试题位置。比如设计单选题30个(所占单元格区域是A5:C34),多选题40个(所占单元格区域是A36:C75),判断题30个(单元格区域是A77:C106)。在功能区打

28、开“插入”选项组,单击“形状”选项,在下拉列表中选择“自选图形”“基本形状”“棱台”,移动鼠标到A1单元格按住鼠标左键画出一个按钮。选中按钮后在名称框中输入“出题按钮”四个字后回车,把它命名为“出题按钮”。右击刚才绘制的出题按钮并选择“添加文字”快捷菜单命令,然后在按钮上输入“出题”两个字。按照同样的方法再设计一个按钮“评分按钮”,添加文字“评分”,如图2所示。图2在A5单元格输入公式“=INDIRECT("单选题!R"&ROW()-3&"C"&COLUMN(),0)”,选中A5单元格并复制,再选中区域A5:C34进行粘贴。在A3

29、6单元格中输入公式:“=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的单

30、元格(A2)的引用,公式中使用了“R1C1”格式的单元格编号,其中3、34、75是由第一题所在的行数减2得来。这个公式实现的是绝对位置引用,即不管在单选题工作表中进行插入、删除行或排序,A5显示的始终都是你从单选题A2中直接看到的内容。因此A5:C34、A36:C75、A77:C106三个区域将分别与相应题库中最前面的30(或40)个题的内容保持一致。选中单元格区域D5:D34,在功能区打开“数据”选项组,单击“数据/有效性”选项,在下拉列表中选择“数据有效性”选项,将弹出“数据有效性”对话框。在“设置”选项卡的“允许”下拉列表中选择“序列”项,再选中“提供下拉箭头”复选项,在“来源”文本框中

31、输入“A,B,C,D”,如图3所示。注意:不输入引号,并且其中的逗号为英文标点状态的格式。图3切换到“出错警告”选项卡,选中“输入无效数据时显示警告”复选项,再在“错误信息”编辑框中输入出错时的提示信息为“只能输入A、B、C、D中的一项或多项,其他任何字符均为非法字符。”,选择“样式”为“停止”,单击“确定”完成设置,如图4所示。图4同样对多选题的D36:D75区域,判断题的D77:D106区域设置数据有效性,只是多选题的“来源”要换成“A,B,C,D,AB,AC,AD,BC,BD,CD,ABC,ABD,ACD,BCD,ABCD”,判断题的“来源”要换成“,×”。当然“出错警告”下的

32、“出错信息”也要作相应修改。这里要着重强调的是多选题的每一个答案,一定要说明必须按字母ABCD的顺序输入多选项,否则无法正确评分,如“ACD”不能输成“CAD”或者“CDA”或者“DAC”或者“DCA”。标准答案也是一样的要求。如果感觉到多选题要输入这么一大串有效性设置太麻烦,那么不设置有效性的选项也可以,只是要在多选题的要求中注明“不按字母顺序输入答案的不给分”就行了。建一个“考生名单”工作表。在A、B、C列分别输入序号、准考证号、考生姓名,其中序号和准考证号的输入可采用序列填充的方法完成。选中B列,在名称框中输入“考号”,回车确定,把B列命名为准考证号,如图5所示。图5回到“试卷”工作表中

33、,选中要输入准考证号的D2单格,执行菜单命令“数据/有效性”,在“设置”选项卡的“允许”下拉列表中选择“序列”,取消“提供下拉箭头”复选项,在“来源”文本框中输入公式“=INDIRECT("考号")”。切换到“出错警告”选项卡,选中“输入无效数据时显示警告”复选框,并输入“错误信息”为“你输入的准考证号并不存在,请重新输入”,并设置样式为“停止”。最后单击“确定”按钮。在F3单元格中输入公式“=IF(D2="","",VLOOKUP(D2,考生名单!B:C,2,FALSE)”,这个公式会在输入准考证号后自动显示考生姓名。右击“出题”按

34、钮,单击“指定宏”快捷菜单命令(若指向按钮中间右击,则不能指定宏),在弹出的对话框中输入宏名为“出题”,如图6所示。图6指定宏单击对话框右侧的“新建”按钮,在弹出的代码编辑窗口中输入如图7所示的代码。图7输入代码Sub出题()IfRange("D2").Value=0Then提示=MsgBox("请先输入准考证号")GoTo重来EndIf说明:如果D2为空则弹出提示要求输入准考证号并直接跳到后面的“重来”处。Sheets("单选题").Range("A:D").SortKey1:=Sheets("单选题&

35、quot;).Range("D2"),Order1:=xlAscending,Header:=xlGuessSheets("多选题").Range("A:D").SortKey1:=Sheets("多选题").Range("D2"),Order1:=xlAscending,Header:=xlGuessSheets("判断题").Range("A:D").SortKey1:=Sheets("判断题").Range("D2&qu

36、ot;),Order1:=xlAscending,Header:=xlGuess说明:以上三行分别对单选题、多选题和判断题工作表的A:D区域按D列随机数按升序排序。说明:对B列设置最适合行高,以完整显示题目。Range("D5").Select说明:定位到D5以便输入答案ActiveSheet.Shapes("出题按钮").Visible=False说明:隐藏出题按钮以防重复选题。ActiveSheet.Shapes("评分按钮").Visible=True说明:显示评分按钮。重来:EndSub注意:试卷中的题目总是显示各题库最前面的

37、若干题,而在此对各题库按随机数排序后,最前面的若干题自然是随机的,也就实现了随机抽题。在功能区中打开“开始”选项组,单击“插入”选项,再选择列表中的“工作表”选项,新建一个工作表,并将其标签名修改为“成绩记录”。在“成绩记录”表的A2单元格中输入公式“=NOW()”。选中A列并右击,单击快捷菜单的“设置单元格格式”命令,然后在弹出的对话框中设置日期格式以显示当前日期时间,如图8所示。图8设置单元格格式在B2、C2单元格中分别输入公式“=试卷!D2”、“=试卷!F2”,用以显示相应数据。在D2单元格中输入公式“=SUM(E2:G2)”,用来对后面三个得分进行合计运算。在E2、F2、G2单元格中则

38、分别输入公式“=SUM(试卷!E5:E34)”、“=SUM(试卷!E36:E75)”、“=SUM(试卷!E77:E106)”,用来分别对单选题、多选题、判断题这三种题型得分进行合计运算。返回到“试卷”工作表,右击“评分”按钮,选择“指定宏”快捷菜单命令,然后在对话框中输入宏名“评分”,再单击“新建”按钮。在弹出的代码窗口中输入如下代码:Sub评分()Sheets("成绩记录").Rows("3:3").InsertShift:=xlDown说明:在“成绩记录”工作表第3行前插入一行。Sheets("成绩记录").Rows("

39、2:2").Copy说明:复制成绩记录工作表第2行。Sheets("成绩记录").Range("A3").PasteSpecialPaste:=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"

温馨提示

  • 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

评论

0/150

提交评论