【文章內容簡介】 能夠實現(xiàn)大量的特別是重復性操作 ， 代碼編寫簡單 ， 且輸入輸出均是在 Excel 表格中完成 ， 基于此利用 VBA 編寫了測井數據標準化程序。對不同區(qū)塊的測井數據進行處理 表明 ，該程序實現(xiàn)了數據的批處理 ， 可極大地減輕手工處理數據的工作量 ， 為油田數據處理提供了一種實用方法 [3]。 在場地平土標高確定和土方工程量的傳統(tǒng)計算方法中 ， 由于經驗法計算的準確度較差 ， 在進行修正和調整時手工計算繁雜、容易出錯、效率低下。為了準確、快捷地確定平土標高及簡化土方工程量計算 ， 為了方便自身和同行設計者以及設計科研單位 ， 秦華擬利用 ExcelVBA 編程技術 ， 實現(xiàn)場地平土標高的自動優(yōu)化及土方工程量的自動計算。文章深入學習和研究了場地平土標高理論、最小二乘法優(yōu)化場地平土標高的原理及其調整理論 ， 著重研究并建 立了土方計算易于 ExcelVBA 編程的數學模型 ， 充分運用了 Excel存貯數據及中間過程的強大處理功能和 VBA 編程技術 ， 實現(xiàn)了場地平土標高的自動優(yōu)化及土方工程量的自動計算。并且通過規(guī)則場地和不規(guī)則場地兩個實例進行了驗證 [4]。 綜上所述，可以看出 ExcelVBA 正廣泛應用在各種工程建設中，而 科學技術的進步北 京 交 通 大 學 畢 業(yè) 設 計 （ 論 文 ） 緒論 5 和生產的發(fā)展是不會停滯不前的 ， 功能強大且大家所熟悉的 Excel 平臺，成本低廉，簡單易懂，因而在中小設計科研單位的應用前景值得看好。相信 ExcelVBA 的這種高級功能會讓越來越多的業(yè)內人士認可。 北京交通大學畢業(yè)設計（論文） 6 2 ExcelVBA 基礎簡介 在通過 VBA 語言編程之前，我們首先要對 ExcelVBA 的一些基本知識的進行初步的了解和掌握。 ExcelVBA 基礎 VBA（ Visual Basic for Applications）是從 Visual Basic 衍生而來的、基于 Office 的應用開發(fā)環(huán)境，主要包括 ExcelVBA、 WordVBA、 ProjectVBA、AccessVBA 等幾個組件。 VBA 的目的是幫助使用者根據自己的需要在 Office 環(huán)境中進行功能模塊的定制與開發(fā) [6]。 ExcelVBA 簡介 ExcelVBA 是指以 Excel 環(huán)境為母體、以 Visual Basic 為父體的類 Visual Basic 開發(fā)環(huán)境 (VBE)集成了大量的 Excel 對象與方法 ， 而在程序設計、計算方式、過程實現(xiàn)方面與 VB 基本相同，通過 VBE可以直接調用 Excel 中的這些對象與方法來提供特定功能的開發(fā)與定制 。 利用定制的功能與界面可以很大程度的提高工作效率，如實現(xiàn)以下特定功能： ，利用按鈕功能來方便操作。 ，進行操作界面的定制，使 Excel 環(huán)境成為一個業(yè)務 系統(tǒng)。 ，定制開發(fā)系統(tǒng)報表功能，簡化在實際報表設計中的操作過程。 。 ，重復的工作便捷化。 盡管 VBA 是基于 Visual Basic 發(fā)展而來的，它們具有相似的語言結構，但是 VBA 與 VB還是有一定區(qū)別的： 北京交通大學畢業(yè)設計（論文） 7 是設計用于創(chuàng)建標準的 應用程序 ， 而 VBA 是使已有的應用程序(Excel 等 )自動化 。 具有自己的開發(fā)環(huán)境 ， 而 VBA 必須寄生于已有的 應用程序 。 VB 開發(fā)的 應用程序 ， 用戶不必安裝 VB， 因為 VB 開發(fā)出的應用程序是 可執(zhí)行文件 (*.EXE)， 而 VBA 開發(fā)的程序必須依賴于它的父應用程序 ， 例如Excel。 是 VB的一個子集。 VBA 的主要特點和優(yōu)勢 VBA 相對于其他編程語言而言，主要的特點及優(yōu)勢如下： ，但是 VBA 提供了一組基于 VB 開發(fā)系統(tǒng)的高級編程工具，有完整的集成開發(fā)環(huán)境（ DE），功能強大， 不需要應用其他的工具創(chuàng)建解決方案。同時 VBA 與宿主應用程序緊密整合，不必從頭開始創(chuàng)建解決方案，能夠充分地利用宿主應用程序自身的功能，便于快速開發(fā)。 VBA 創(chuàng)建的解決方案沒有脫離用戶已熟悉的應用程序環(huán)境，更容易被用戶所接受。同時解決方案與應用程序界面保持一致，很少甚至無需對用戶進行培訓。 VBA 提供的功能，能夠在應用程序使用的過程中執(zhí)行。并且能夠將使用 VBA 代碼編寫的通用程序和自定義函數制作成通用的加載項，在不同的場合重復使用。 簡單易學，易于使用。 VBA 源自 VB，而 VB 本身就 是一種便于快速開發(fā)的語言，不僅提供了強大的編程能力，而且易于學習和使用，了解 VB 的用戶可以迅速地轉移到 VBA 中來。同時，宿主應用程序提供的錄制宏功能，不僅為用戶提供了一種學習應用程序編程模型的簡單方法，而且能迅速 獲得并應用滿足要求的 VBA 代碼。 Excel 宏簡介 宏是通過一次單擊就可以應用的命令集。它們幾乎可以自動完成用戶在程序中執(zhí)行的任何操作，宏是一系列的命令與函數，存儲于 Visual Basic 模塊中，并且在需要執(zhí)行該項任務時可隨時運行。如果經常重復執(zhí)行某項任務，則可用宏北京交通大學畢業(yè)設計（論文） 8 自動完成該任務。 宏 是編程，但即使用戶不是開發(fā)人員也可以使用它們，甚至不需要具備任何編程知識，在 Office 程序中可以創(chuàng)建的多數宏都是用 VBA 語言編寫的。宏可以節(jié)省時間，并可以擴展日常使用的程序的功能。 宏編輯的優(yōu)勢在于：同模板相比，它更為精巧，使用起來更為方便、靈活 ， 用戶不必為某一特殊任務而去創(chuàng)建模板，只需在工具欄中選中相應的快捷命令即可。同時，還可以針對不同的情況進行命令的任意組合，快速、準確地完成所需的工作 [7]。 Excel 的自動化過程大都可以通過錄制宏完成，但是宏錄制器存在以下局限性： ； ，即用戶無法進行輸入，計算機無法給出提示； Excel 對話框； ； VBA 可以解決以上問題，使 Excel 可以完成自身無法完成的任務 [7]。 VBA 程序設計基礎 前面介紹了 VBA的一些基礎的知識和 VBA相對于其他編程語言的一些主要優(yōu)勢及特點，對 Excel 宏也做了簡單介紹，接下來將介紹一些基礎的 VBA 程序設計的語法知識。 函數與過程 過程和函數就是能執(zhí)行特定功能的語句塊。多年來編程語言的發(fā)展趨勢就是更注重代碼的重用性，使程序結構更加清晰。其 實函數也是過程，不過它是一種特殊的、能夠返回值的 Function 過程。能否返回值，也是常說的過程和函數之間的最大區(qū)別。 過程是構成程序的一個模塊，往往用來完成一個獨立的功能。過程可以使程序更清晰、更具結構性。 Sub 過程、 Function 函數是 VBA 中比較常用的過程，只不過 Function 函數是一種特殊的過程，它有返回值，而 Sub 過程沒有返回值 。 北京交通大學畢業(yè)設計（論文） 9 過程最大的好處就是在一個地方寫了一個功能模塊之后 ， 如果要在其他的地方實現(xiàn)同樣的功能，不必將代碼重新寫一遍，只要直接調用就行。當發(fā)現(xiàn)功能模塊有錯誤時，不必在 整個應用程序中查找錯誤，然后逐個改正逐句調試。此時只需要更改過程和函數，調試成功，程序中所有引用的該過程或函數都將得到維護。 Sub 語句聲明一個新的過程、它接受的參數和該過程中的代碼。其語法格式如下： [Public/Private][Static] Sub 子程序名 ([ 參數 ]) [As 數據類型 ] [ 子程序語句 ] [Exit Sub] [ 子程序語句 ] End Sub 使用 Public 關鍵字可以使這個子過程適用于所有模塊中的所有其他過程 ；用 Private 關鍵字可以使該子過程只用于同一 模塊的其他過程；用 Static 過程建立靜態(tài)過程。 子過程包括窗體事件過程和通用過程，其中，窗體事件過程名由 From_事件名組成，多文檔窗體用 MDIForm_事件名。而通用過程是一個必須從一個過程顯示調用程序段 ， 通過過程有助于將復雜的應用程序分解成多個易于管理的邏輯單元 ， 使應用程序更簡潔，更易于維護。 建立 Sub 過程的方法： (1)打開代碼編輯器窗口， (2)如圖 21所示，選擇 “ 插入 ” 菜單中的 “ 過程 ” ， (3)彈出如圖 22所示的 “ 添加過程 ” 對話框，從對話框中輸入過程名，并選擇類型和范圍， (4)在新創(chuàng)建的過程中輸入內容。 北京交通大學畢業(yè)設計（論文） 10 圖 21 插入過程 圖 22 添加過程對話框 函數實際是實現(xiàn)一種映射，它通過一定的映射規(guī)則，完成運算并返回結果。VBA 的自定義函數也就是根據需求編制一個符合自己格式的函數。自定義函數一般都是把許多 VB自帶的函數編制一個符合自己需要的函數。 [Public/Private] Function 函數名稱 ([ 參數列表 ])[As 數據類型 ] 局部常量、變量定義語句組 函數名稱 =返回值 End Function 控制結構 VBA 具有結構化程序設計的三種結構，即順序結構、選擇結構、循環(huán)結構，它們是程序設計的基礎。 順序結構就是個語句按出現(xiàn)順序先后次序執(zhí)行。一般的程序設計語言中 ， 順序結構的語句主要是賦值語句、輸入 /輸出語句等。在 VB 中也有賦值語句 ， 而輸入 /輸出可以通過文本框控件、標簽控件、 InputBox 函數、 MsgBox 函數和過程來實現(xiàn)。這里主要講賦值語句。 賦值語句的工作流程是：計算右邊表達式的值，然后賦給左邊的變量。給變量賦值和設定屬性是 VB 編程中常見的兩個任務。 形式：變量名 =表達式 例如： n=n+1 180。計數累加 北京交通大學畢業(yè)設計（論文） 11 = 180。清除文本框的內用 =歡迎使用 VB 180。文本框顯示字符串 計算機最擅長的功能之一就是按規(guī)定的條件，重復執(zhí)行某些操作。 VBA中提供了兩種類型的循環(huán)語句：一種是計數循環(huán)語句；另一種是條件循環(huán)語句。 (1)For?next 循環(huán)語句用于控制循環(huán)次數預知的循環(huán)結構 它的形式如下： For 循環(huán)變量 = 初值 To 終值 [Step 步長 ] 語句 塊 [Exit For] 語句塊 Next 循環(huán)變量 循環(huán)變量必須為數值型。 (2)For each?next 語句 在 VBA 中， for each 結構是個功能強大的語句結構。它允許用戶為集合對象中的每個元素執(zhí)行循環(huán)內的程序區(qū)塊內容。 它的形式如下： For each 變量 in 集合對象 /數組 程序塊 [Exit For] 程序塊 End for 當進入該循環(huán)式，程序便會先針對組中的第一個元素，執(zhí)行循環(huán)中的所有程序區(qū)塊的內容。 (3)Do?Loop 循環(huán)語句 當想要執(zhí)行固定次數的工作時，可以用 For?next 語句。倘若程 序所要執(zhí)行的工作是屬于不固定次數的情形時，則可以考慮使用 Do?Loop 語句來編寫程序。該循環(huán)語句是根據條件進行循環(huán)。具體有兩種形式： 形式 1： Do｛ While/Until } 條件 北京交通大學畢業(yè)設計（論文） 12 語句塊 [Exit Do 語句塊 ] Loop 形式 2： Do 語句塊 [Exit Do 語句塊 ] Loop｛ While/Until } 條件 形式 1 為先判斷后執(zhí)行，有可能一次也不執(zhí)行；形式 2 為先執(zhí)行后判斷，至少執(zhí)行一次。 判斷結構 VBA 提供了多種形式的條件語句來實現(xiàn)選擇 結構，有 If 條件語句和 Select情況語句等。它們都是對條件進行判斷，根據判斷結果，選擇執(zhí)行不同的分支。 …Then 語句 (單分支結構 ) 該語句是用來判斷 if 后面的判斷式是否為 True，若為 True，才執(zhí)行 then 之后的語句；否則將不執(zhí)行該語句。它的語法格式如下 ： If 表達式 Then 語句塊 End If …Then…Else 語句 (雙分支結構 ) If 表達式 Then 語句塊 1 Else 語句塊 2 End If 當表達式的值為 True 時，執(zhí)行 Then 后面的語句塊 1，否則執(zhí)行 Else 后面的語句塊 2。 …Then…Else 語句 (多分支結構 ) If 表達式 Then 北京交通大學畢業(yè)設計（論文） 13 語句塊 1 Else 語句塊 2 … [Else 語句塊 n+1] End If 作用：根據不同的表達式值確定執(zhí)行哪個語句塊。 case 語句 Select case 語句也是 VB 編程中常用的選擇結構，它的具體形式如下 [6]： Select Case 變量或表達式 Case 表達式列表 1 語句塊 1 Case 表達式列表 2