本站小編為你精心準備了Excel軟件在高校教務管理中的應用參考范文，愿這些范文能點燃您思維的火花，激發您的寫作靈感。歡迎深入閱讀并收藏。

《辦公自動化雜志》2015年第三期

一、excelVBA基本知識

1、條件控制語句條件控制語句就是根據一定的條件，控制程序的走向。最通俗的說法就是當滿足某個條件時執行某段程序，否則執行另一段程序。最基本的條件控制語句是If…Then…Else。該語句的具體格式如下。其中，條件就是布爾類型的變量，如果條件為true，就執行語句塊1，否則執行語句塊2。條件控制語句的語法規則跟我們語言中的“如果…就…否則…”本質上是一樣的，都是根據一定的條件決定后續的工作。為了滿足一些復雜情況的需要，我們還可以對條件控制語句進行嵌套使用。嵌套使用方法與Excel中的If函數使用基本一致，這里就不再贅述。

2、循環控制語句循環結構是用于處理重復執行的結構，可以重復執行若干條語句。循環結構是程序設計中經常遇到的程序機構，也是使用最多的程序結構之一。VBA中循環結構也有許多種，但最基礎也是使用最頻發的就是For…Next循環結構，其基本語法如下：For計數器=初始值To終止值語句塊Next計數器所謂計數器其實就是一個整型變量。程序根據該變量的取值范圍控制語句塊的執行次數。對于Excel表格來說，最常見的循環范圍就是表格所有行。到目前為止，我們介紹了VBA中的變量、條件控制語句和循環控制語句。下面，我們會利用這三種VBA基本語法規則實現高效教務工作中最常見的高校教師工作量統計計算。由于高校不同院系之間，同一院系不同專業之間存在授課的交叉情況，這就為教師工作量統計帶來了一定的困難。許多情況下，單純利用Excel提供的函數很難一步到位的完成統計工作。下面一節，我們會根據一個實際的數據展示如何利用VBA實現這一計算。

二、利用VBA實現高校教師工作量重復課系數計算

高校教師工作量統計是衡量教師每學期工作的基礎，直接影響了教師的各項評定。其中，由于教師上課的復雜性，重復課系數的計算很難直接套用Excel提供的函數直接完成。圖2為某高校某學院教師教學真實統計信息。該數據有如下幾個特點：●某些教師負責同一班級的多門課程；●某些教師負責不同班級的同一門課程；●某些教師負責不同班級的不同課程；●此外，每一門課程的選課人數也影響著教師工作量的計算。根據該高校學院的規定，一位教師工作量重復課系數計算規則如下。1、如果該教師只為一個班級教授一門課，那么該門課的重復課系數為1.0；2、如果該教師為2到4個班級教授同一門課，根據選擇該門課的學生人數進行設置該門課的重復課系數：對于人數最多的班級，該門課的重復系數設為1.0；剩下的其他班級這門課系數設為0.9；3、如果該教師教授這門課的班級超過4個，根據不同班級的選課人數，挑選出選課人數最少的三個班級并把這些班級重復課系數設為0.9，剩下的其他課程設為1.0。從這三個基本計算規則我們很容易發現，由于教師授課情況的復雜，利用Excel集成的函數很難完成教師重復課系數的計算。在這種情況下，多數高校教務人員不得不采用手動計算的方法。很明顯，手動計算效率底下且容易出錯，出了問題也很難找到進行修正。其實利用VBA可以很輕松的完成該計算過程。只要簡單利用本文上面提到的條件控制語句和循環控制語句，結合一定的邏輯判斷即可完成。具體代碼如表1所示。如表所示，該代碼一共有35行。看起來代碼很多，其實代碼中有很多代碼塊是非常相似的，只要理解其中一小部分代碼的含義，即可了解整個代碼的運行機制。整個高校教師工作量重復課系數計算流程就是：（1）在該Excel工作表中隊選課人數按照從大到小的順序進行排序；（2）點擊VBA代碼窗口中的運行按鈕（如圖3紅色區域所示），執行該段代碼，重復課系數即可自動計算出來并添加到相應的單元格中。下面我們對該段代碼的具體含義做個簡單的介紹。

表1重復課系數計算代碼該段代碼共35行，第1行代碼“Subcompute（）”和第35行代碼“EndSub”是該代碼段的標識。由于一個表格可能需要多種代碼滿足不同的計算需求，這就需要一定的方法用來標注不同的代碼段。其中Sub標識符后邊的名字，用戶可以根據自身的需要自由命名。第2行代碼用來聲明三個變量，用于后續的計算。第3行代碼是獲取該Excel表格的所有行數，為了去掉標題行我們對獲取的行數減1。從第4行代碼到第34行代碼是一個本文在前面介紹到的循環控制語句，對該表格所有行數據進行逐一計算。第5行到第33行代碼是一個條件控制語句，用來判斷當前進行計算的行是否已經計算過，如果沒有計算過則進行后續處理，否則直接跳到下一行數據再次判斷。第7行代碼直接調用Excel集成的Match函數計算整個表格中與當前行的任課教師和課程相同的行數數量。從第8行到第33行代碼根據得到的滿足條件的行的數量進行分別處理：（1）如果第8行If語句判斷為1，則直接執行第9行語句，直接在對應的單元格賦值為1.0；（2）如果第8行If語句判斷失敗，則表明滿足條件的行數大于1，調用第11行到第32行的條件判斷語句進行處理；（3）調用代碼第11行判斷滿足條件的行數是否在2-4之間，如果滿足則調用第12到底20這段循環代碼對相應單元格進行賦值。由于事先已經對表格按照選課人數進行排序，所以只要對第一個滿足條件的行的重復課系數設為1.0，其他設為0.9；（4）如果第11行語句判斷行數大于4，則執行第22到第30這段循環控制語句代碼，挑選出選課人數最少的三行，設置其重復課系數為0.9，其他行設為1.0。這段代碼看似復雜，其實有許多功能相近的子塊，如第12到第20代碼塊和第22代碼塊到第30代碼塊。這些相似代碼塊由條件控制語句控制其執行流程。

三、小結

VBA包含了數量眾多變量類型及許多不同種類的控制語句。但只要我們掌握了其中幾種最基本的語法規則就可以完成看似復雜的運算，彌補Excel集成的函數在應用靈活上的不足，極大提高廣大高校教務員的工作效率。

作者：馮陳芙單位：臺州學院