亚洲免费av电影一区二区三区,日韩爱爱视频,51精品视频一区二区三区,91视频爱爱,日韩欧美在线播放视频,中文字幕少妇AV,亚洲电影中文字幕,久久久久亚洲av成人网址,久久综合视频网站,国产在线不卡免费播放

        ?

        利用Excel VBA實現(xiàn)高職學(xué)生考證信息的統(tǒng)計

        2017-11-25 12:59:51唐娟
        科技資訊 2017年28期
        關(guān)鍵詞:考證統(tǒng)計

        唐娟

        摘 要:高職學(xué)生紛紛通過考證來提高自己的就業(yè)競爭力,學(xué)校教學(xué)部門需要了解學(xué)生的考證情況。本文利用Excel VBA編程,對高職學(xué)生考證信息進行歸納和統(tǒng)計,給出了可供參考的功能代碼,為學(xué)校提供靈活、準確的考證資料。

        關(guān)鍵詞:Excel VBA 考證 統(tǒng)計

        中圖分類號:TP311 文獻標識碼:A 文章編號:1672-3791(2017)10(a)-0011-02

        面對嚴峻的就業(yè)形勢,高職學(xué)生紛紛通過“考證”來提高自己的就業(yè)競爭力,一般來說,高職學(xué)生所考的證書分為兩類:一類是與本專業(yè)相近的職業(yè)資格證書,如電工證、物流師證、育嬰師證等,另一類是公共類證書,如普通話水平證、英語四六級證、計算機等級證等[1]。高職學(xué)生考證“熱”,學(xué)校教學(xué)部門也“熱切”于了解學(xué)生的考證情況,如機電專業(yè)學(xué)生電工證的考證人數(shù)和通過人數(shù)、所有學(xué)生英語四級證的報考人數(shù)和通過率等。如果考證的原始成績數(shù)據(jù)是excel電子表格,基于數(shù)量的數(shù)據(jù)統(tǒng)計只需要通過Excel函數(shù)進行匯總和計算即可,但是教學(xué)部門往往需要進一步了解的是:具體到每個教學(xué)班、每個學(xué)生的某個證書是否考過并是否通過。以公共類證書為例,想得到學(xué)生考證信息統(tǒng)計表(如圖1所示),只用Excel函數(shù)功能無法實現(xiàn)。Microsoft Excel還有一個非常有用且功能強大的工具,即Excel VBA。

        VBA是Visual Basic for Applications的縮寫,是內(nèi)嵌于office軟件中的一個開發(fā)模塊,這個模塊提供程序自主開發(fā),語言基礎(chǔ)和VB(Visual Basic)相似,通過VB的編程完成需要的功能。

        1 Excel中VBA編程和執(zhí)行步驟

        以Excel2010為例,VBA編程和執(zhí)行程序的步驟如下[2]。

        (1)點擊“開發(fā)工具→Visual Basic編輯器”命令,進入“Visual Basic編輯器”窗口。

        在左側(cè)“工程資源管理器”窗口中,選中保存宏的工作簿,然后執(zhí)行“插入模塊”命令,插入一個新模塊(模塊1)。

        (2)將相關(guān)宏代碼輸入或復(fù)制、粘貼到右側(cè)的編輯窗口中。注意:宏的結(jié)構(gòu)是:

        Sub 宏名稱()

        VBA代碼

        End Sub

        輸入完成后,關(guān)閉“Visual Basic編輯器”窗口返回即可。

        (3)執(zhí)行該程序,可以點擊“開發(fā)工具→宏”,選擇相應(yīng)的宏名即可。

        2 考證統(tǒng)計的VBA代碼編寫

        本文以計算機等級考試考證情況統(tǒng)計為例,給出實現(xiàn)過程。

        首先打開一個工作薄,將歷次計算機等級考試成績?nèi)靠截惖絪heet1中,至少包含準考證號、姓名、身份證號、成績四列,如圖2所示。計算機等級考試準考證號最左邊兩位代表考試科目,圖2中“15”為計算機等級考試一級科目之一,“24”和“29”為計算機等級考試二級科目。

        然后,需要了解哪些學(xué)生的考證情況,就將這些學(xué)生的姓名、身份證號等信息放到sheet2表中,如圖3所示。

        再進行編程前的分析:為方便日后數(shù)值的匯總,圖3中計算機一級和計算機二級兩列的值,可以用“1”代表成績合格,“0”代表成績不合格,“-1”代表未參加過考試。程序邏輯為:將計算機一級和計算機二級列中狀態(tài)值全部預(yù)設(shè)為“-1”,代表該科目未參加過考試。順次取sheet2中的各行身份證號遍歷sheet1成績表,如sheet1中找到相同身份證號的記錄,則判斷相應(yīng)的準考證號最左邊兩位代表的是一級還是二級,若該行記錄中的成績?yōu)榧案?,則將sheet2中相應(yīng)級別下單元格的值置為1;如不及格,須判斷該單元格內(nèi)是否有為1的值,若不為1,則置為0。

        程序邏輯分析完畢,按本文前述方法,為工作簿sheet2,插入一個VBA模塊。該模塊的主要代碼如下:

        For i = 2 To UBound(arr) ‘a(chǎn)rr為sheet2數(shù)據(jù)區(qū)域

        ls_identity_id = Sheet2.Range("c1").Rows(i).Value

        For j = 2 To UBound(crr) ‘crr為sheet1數(shù)據(jù)區(qū)域

        If Sheet1.Range("c1").Rows(j).Value = ls_identity_id Then

        If Left(Sheet1.Cells(j, "a"), 2) = 15 Then

        If Sheet2.Cells(i, "e").Value <= 0 Then

        If Sheet1.Cells(j, "d") < 60 Then Sheet2.Cells(i, "e").Value = 0

        Else Sheet2.Cells(i, "d").Value = 1

        End If

        End If

        Else

        If Sheet2.Cells(i, "f").Value <= 0 Then

        If Sheet1.Cells(j, "d") < 60 Then Sheet2.Cells(i, "f").Value = 0

        Else Sheet2.Cells(i, "e").Value = 1

        End If

        End If

        End If

        End If

        Next

        Next

        執(zhí)行以上程序,得到如下結(jié)果,如圖4所示。

        英語四六級等其它科目的考證信息統(tǒng)計可參考以上方法,不再贅述。有了圖4的結(jié)果,如想?yún)R總某個證書獲證人數(shù),可累加相應(yīng)列中所有為“1”的值,匯總未參加考證的人數(shù),可累加為“-1”的值。另外,根據(jù)實際需要,可以將數(shù)字“1”“-1”“0”整體替換為有實際意義的漢字,圖1即為替換后的效果。

        本文利用VBA編程歸納、統(tǒng)計高職學(xué)生考證信息,為學(xué)校教學(xué)部門提供了準確詳細的資料,給出的功能代碼,可供學(xué)校教學(xué)管理人員參考使用。

        參考文獻

        [1] 曹志英.高職學(xué)生考證熱現(xiàn)象的分析與思考[J].青年與社會:上,2015(5):162.

        [2] 李曉玫,楊小平.Excel中的VBA程序設(shè)計[J].四川師范大學(xué)學(xué)報:自然科學(xué)版,2004(4):423-426.endprint

        猜你喜歡
        考證統(tǒng)計
        高職院校技能競賽保障體系
        蕪湖《商務(wù)日報》檔案之發(fā)現(xiàn)及初步研究
        今傳媒(2016年11期)2016-12-19 12:47:19
        基于考證與實操并舉的會計專業(yè)改革與實踐研究
        成才之路(2016年35期)2016-12-12 11:51:29
        2008—2015我國健美操科研論文的統(tǒng)計與分析
        人間(2016年27期)2016-11-11 17:33:19
        山東省交通運輸投資計劃管理信息系統(tǒng)的設(shè)計
        我國居民收入與消費關(guān)系的統(tǒng)計分析
        市場經(jīng)濟背景下的會計統(tǒng)計發(fā)展探究
        商(2016年27期)2016-10-17 05:50:19
        国产sm调教视频在线观看| 91熟女av一区二区在线| 国产亚洲视频在线播放| 午夜福利啪啪片| 久久国产偷| 按摩女内射少妇一二三区| 91精品国产综合久久久蜜| 国产高潮视频在线观看| 欧美日韩在线观看免费| 熟女少妇丰满一区二区| 成人性生交大片免费入口| 国产女人高潮视频在线观看| 亚洲电影一区二区三区| 骚货人妻视频中文字幕| 综合偷自拍亚洲乱中文字幕| 国产免费丝袜调教视频| 欧美日韩中文字幕日韩欧美| 亚洲国产一区二区av| 成在线人av免费无码高潮喷水| 正在播放国产对白孕妇作爱| 69堂在线无码视频2020| 国产一区二区黄色的网站| 大胸少妇午夜三级| 青草热久精品视频在线观看| 粉嫩的18在线观看极品精品| 女人无遮挡裸交性做爰| 无遮无挡爽爽免费视频| 精品久久久久88久久久| 粉嫩的极品女神尤物在线| 免费va国产高清大片在线| 一出一进一爽一粗一大视频免费的| 色av色婷婷18人妻久久久| 久久精品夜色噜噜亚洲a∨| 国产99久久亚洲综合精品| 国产成人av综合色| av男人的天堂亚洲综合网| 99精品国产在热久久| 国产成人免费高清激情明星 | 亚洲产在线精品亚洲第一站一 | 久久蜜桃资源一区二区| 精品人妻午夜一区二区三区四区|