999精品在线视频,手机成人午夜在线视频,久久不卡国产精品无码,中日无码在线观看,成人av手机在线观看,日韩精品亚洲一区中文字幕,亚洲av无码人妻,四虎国产在线观看 ?

基于Excel VBA的教學(xué)工作量統(tǒng)計(jì)模板設(shè)計(jì)

2010-01-01 00:00:00高煜妤
科教導(dǎo)刊 2010年4期

摘要本文介紹了應(yīng)用Excel VBA(Visual Basic for Alication)編制的教師教學(xué)工作量統(tǒng)計(jì)模板,其形式為Excel工作簿文件,新穎獨(dú)特,精巧實(shí)用,操作簡(jiǎn)便,功能較強(qiáng),大大簡(jiǎn)化常規(guī)工作統(tǒng)計(jì)工作,對(duì)提高教學(xué)管理水平和工作效率有重要作用。

關(guān)鍵詞Excel VBA 工作量統(tǒng)計(jì)

中圖分類號(hào):G420文獻(xiàn)標(biāo)識(shí)碼:A

在學(xué)校教學(xué)管理中,統(tǒng)計(jì)工作量是每學(xué)期的必要工作之一。教師教學(xué)工作量的計(jì)算是否科學(xué),將在一定程度上影響教師對(duì)教學(xué)工作的態(tài)度,最終將會(huì)影響學(xué)校的教學(xué)質(zhì)量的提高??陀^評(píng)價(jià)教師教學(xué)質(zhì)量的基礎(chǔ)上,教學(xué)工作量的計(jì)算應(yīng)體現(xiàn)公平、公正,讓絕大多數(shù)的教師感覺到勞動(dòng)價(jià)值的合理性。從而有利于穩(wěn)定教學(xué)秩序,提高教學(xué)質(zhì)量,有利于加強(qiáng)師資隊(duì)伍的建設(shè)與管理,為科學(xué)化、規(guī)范化教學(xué)管理提供依據(jù)。因此,設(shè)計(jì)教學(xué)工作量表應(yīng)較全面,并且分類清晰。

1 需求分析

(1)直接利用Excel環(huán)境,盡可能利用Excel的已有功能,特別是它的編輯、表格、打印等功能。既可以使繁瑣、重復(fù)操作自動(dòng)化,提高工作效率和應(yīng)用水平,同時(shí)又不改變Excel原有的界面、風(fēng)格和操作方式。因此符合人們的習(xí)慣,易于使用和推廣。

(2)工作量總表中教師、教室、班級(jí)、課程信息既可直接用鍵盤輸入,也可從組合框選擇輸入,總表內(nèi)容輸入后,基礎(chǔ)工作即告完成,接下來(lái)每位教師的工作量、每個(gè)學(xué)院的工作量、每個(gè)學(xué)期的工作量以及實(shí)習(xí)、課程設(shè)計(jì)等各種分類的工作量由系統(tǒng)自動(dòng)生成,課表的修飾、復(fù)制、打印也由計(jì)算機(jī)實(shí)現(xiàn)。

(3)當(dāng)某位教師對(duì)自己的工作量提出異議,可利用系統(tǒng)的在線標(biāo)識(shí)功能,得以反應(yīng)到教學(xué)管理人員那里,既準(zhǔn)確又迅速。

2 實(shí)現(xiàn)方法

本模板的設(shè)計(jì)思想是利用已有的大家都熟悉的excel辦公軟件,做出一個(gè)實(shí)用的計(jì)算機(jī)輔助工作量統(tǒng)計(jì)工具。“宏”是Microsoft Office 軟件包中自帶的模塊,“VBA (Visual Basic for Alications )”是 Microsoft Office 軟件包自帶的應(yīng)用程序開發(fā)環(huán)境。同時(shí)VBA是一種強(qiáng)大的開發(fā)技術(shù),將“宏”與“VBA”結(jié)合,就能開發(fā)具有個(gè)性化的輔助軟件。且開發(fā)過(guò)程用時(shí)較少,效率較高,能滿足教學(xué)管理員高效化、簡(jiǎn)單化的需要。

選定一個(gè)工作表,然后按所需格式建立輸入相關(guān)格式,再在表格輸入標(biāo)題等文字,表格應(yīng)反映教師姓名、職稱、課程性質(zhì)、授課班級(jí)、班級(jí)系數(shù)等,最后應(yīng)分課程顯示總的學(xué)時(shí)。在Office 中提供的VBA 開發(fā)界面稱為VBE( Microsoft Visual Basic Editor) 窗口,在該窗口中用戶可以實(shí)現(xiàn)應(yīng)用程序的編寫。在Excel 的菜單欄中執(zhí)行“工具→宏→Visual Basic 編輯器”命令,可以打開VBE界面,再單擊“視圖”的“代碼窗口”即可以輸入“程序示例”→調(diào)試→保存→運(yùn)行即可。在錄入基礎(chǔ)數(shù)據(jù)之后,表格相應(yīng)單元格可以自動(dòng)進(jìn)行填充。

利用Excel 表格、函數(shù)、VBA 編程,設(shè)計(jì)三個(gè)工作表:參數(shù)設(shè)定工作表、授課情況工作表、查詢與匯總工作表。其中,參數(shù)設(shè)定工作表設(shè)計(jì)了三類參數(shù):職稱參數(shù)、課程參數(shù)、班級(jí)參數(shù)。同時(shí)在菜單條上創(chuàng)制一個(gè)新菜單項(xiàng):統(tǒng)計(jì)(S) ,并設(shè)置其相應(yīng)子菜單。讓復(fù)雜的計(jì)算工作在程序后臺(tái)進(jìn)行,操作者只需導(dǎo)入基本數(shù)據(jù)后,點(diǎn)擊相應(yīng)菜單即可實(shí)現(xiàn)以下功能:計(jì)算工作量、匯總工作量、查詢工作量等。

3 程序示例

利用Excel VBA開發(fā)窗體和宏,可以在較大的自由度下實(shí)現(xiàn)數(shù)據(jù)查詢和匯總。以下這段程序是結(jié)合Excel 電子表格,采用VBA編寫程序代碼,添加菜單項(xiàng)(統(tǒng)計(jì)S),利用宏和菜單完成程序功能,便于教學(xué)管理員查詢、匯總和打印,也便于教師們查對(duì)核實(shí),其他程序部分不再給出。

首先,利用VBA 語(yǔ)言,編寫5個(gè)宏:SKCX、YXCX、JSCX、XZHZ、QKJL 。其次,ThisWorkbook 里編寫程序代碼,在Excel 菜單條上添加一個(gè)新的下拉菜單項(xiàng):“統(tǒng)計(jì)(S)”,將5個(gè)宏整合到該菜單中。程序代碼如下:

統(tǒng)計(jì)工作表激活時(shí),將五個(gè)宏添加到菜單

Private Sub Worksheet_Activate ()

Dim items As Variant

menuindex = Application. CommandBars (1) .

Cont rol s (10) . Index

Set 自定義菜單= Application. CommandBar s

(1) . Cont rol s. Add ( Type : = msoCont rolPop up ,be2

fore : = menuindex ,temporary : = True)

自定義菜單. Caption = “統(tǒng)計(jì)( S) ”

Set item1 = Application. CommandBar s (1) .

Cont rol s (“統(tǒng)計(jì)( S) ”) . Cont rol s. Add

item1. Caption = “刷新記錄(1-2-3-4)”

item1. OnAction = “刷新記錄”

Set item1 = Application. CommandBar s (1) .

Cont rols (“統(tǒng)計(jì)( S) ”) . Cont rol s. Add

item1. Caption =”1-按授課性質(zhì)查詢”

item1. OnAction = “SKCX”

Set item1 = Application. CommandBar s (1) .

Cont rols (“統(tǒng)計(jì)( S) ”) . Cont rol s. Add

item1. Caption = “2-按院系查詢”

item1. OnAction = “YXCX”

Set item1 = Application. CommandBar s (1) .(下轉(zhuǎn)第34頁(yè))(上接第32頁(yè))

Cont rols (“統(tǒng)計(jì)( S) ”) . Cont rol s. Add

item1. Caption = “3-按教師查詢”

item1. OnAction = “JSCX”

Set item1 = Application. CommandBar s (1) .

Cont rols (“統(tǒng)計(jì)( S) ”) . Cont rol s. Add

item1. Caption = “4-選擇性匯總”

item1. OnAction = “XZHZ”

Set item1 = Application. CommandBar s (1) .

Cont rols (“統(tǒng)計(jì)( S) ”) . Cont rol s. Add

item1. Caption = “清空原記錄”

item1. OnAction = “QKJL”

End Sub

4 結(jié)論

本系統(tǒng)實(shí)現(xiàn)了對(duì)工作量計(jì)算的輔助統(tǒng)計(jì)功能,具有很好的實(shí)用價(jià)值,已在我院的實(shí)際排課中得到應(yīng)用,取得了較好的效果。不僅大大減少人工計(jì)算和核對(duì)的工作量,而且讓工作量的計(jì)算統(tǒng)計(jì)更加具有人性化和科學(xué)性,提高了工作效率,適應(yīng)教育現(xiàn)代化的要求。

參考文獻(xiàn)

[1]韓澤坤.Excel VBA高效辦公范例應(yīng)用[M].北京:中國(guó)青年電子出版社,2004.

[2]夏強(qiáng).Excel VBA 應(yīng)用開發(fā)與實(shí)例精講[M].北京:科學(xué)出版社.

[3]李政.VBA 應(yīng)用基礎(chǔ)及實(shí)例教程[M].國(guó)防工業(yè)出版社,2005.

[4]何兵.基于VBA 的AutoCAD 圖塊屬性提取與Excel輸出[J].瀘州職業(yè)技術(shù)學(xué)院學(xué)報(bào),2004(2).

主站蜘蛛池模板: 国产chinese男男gay视频网| 青草国产在线视频| 免费a级毛片18以上观看精品| 久久久久人妻一区精品色奶水| 亚洲中文精品人人永久免费| 亚洲男人天堂2018| 国产高清在线丝袜精品一区| 亚洲精品片911| 国产精品主播| AV天堂资源福利在线观看| 99视频全部免费| 国产美女在线免费观看| 午夜啪啪福利| 欧美成人手机在线观看网址| 欧美不卡视频一区发布| 欧美成人看片一区二区三区| 夜夜拍夜夜爽| 在线观看国产小视频| 中文字幕 91| 亚洲国产精品一区二区高清无码久久| 无码在线激情片| 自拍偷拍欧美| 一级片免费网站| 一区二区三区四区精品视频| 欧美激情综合一区二区| 国产成人精品免费视频大全五级 | 国产迷奸在线看| 久热中文字幕在线观看| 91无码视频在线观看| 久久免费成人| 亚洲,国产,日韩,综合一区| 亚洲第一成年网| 在线日韩日本国产亚洲| 亚洲欧美日韩另类在线一| 自偷自拍三级全三级视频 | 午夜免费小视频| 高清色本在线www| 免费又爽又刺激高潮网址| 日韩免费毛片视频| 国产欧美日韩在线在线不卡视频| 亚洲欧美日韩中文字幕在线一区| 亚洲男人天堂网址| 国产www网站| 91在线日韩在线播放| 在线亚洲天堂| 国产精品成人不卡在线观看| 国产日本欧美在线观看| 成人国产精品一级毛片天堂| 国产成人免费手机在线观看视频| 18禁高潮出水呻吟娇喘蜜芽| 91视频99| 精品国产aⅴ一区二区三区| 美女黄网十八禁免费看| 国产在线观看精品| 国产无码高清视频不卡| 日韩精品高清自在线| 高清精品美女在线播放| 99青青青精品视频在线| 国产精品无码AV中文| 国产成人综合久久精品尤物| 再看日本中文字幕在线观看| 国产成人精品视频一区二区电影| 91久久夜色精品国产网站| 日韩色图区| 日韩成人免费网站| 亚洲精品无码日韩国产不卡| 亚洲人成网站色7799在线播放| 伊人久久综在合线亚洲91| 黄色片中文字幕| 91九色视频网| 日本久久网站| 亚洲天堂久久| 亚洲IV视频免费在线光看| 国模视频一区二区| 999国内精品视频免费| 日韩中文无码av超清| 国产精品免费入口视频| 欧美一区二区三区国产精品| 伊伊人成亚洲综合人网7777| aa级毛片毛片免费观看久| 亚洲欧美日韩综合二区三区| 国产午夜精品一区二区三区软件|