VBA語法.doc

VBA語法技巧數(shù)據(jù)類型“數(shù)據(jù)類型”是指如何將數(shù)據(jù)存儲在內(nèi)存中。(1)Boolean表示邏輯數(shù)據(jù)，可以是True或False中的任一個值。占用2字節(jié)的存儲空間，取值范圍為True或False，缺省值為False。(2)Byte只能表示正數(shù)。占用1字節(jié)的存儲空間，取值范圍為0-255，缺省值為0。(3)Currency一種保存貨幣值數(shù)據(jù)的特殊數(shù)字格式。占用8字節(jié)的存儲空間，取值范圍為-922337203685477.5808-922337203685477.5807，缺省值為0。(4)Date一種用于表示日期或時間的專用格式。占用8字節(jié)的存儲空間，取值范圍為100年1月1日9999年12月31日，缺省值為00：00：00。 (5)Decimal一種包含以10的冪為刻度的十進(jìn)制數(shù)的變體子類型，只能通過CDec轉(zhuǎn)換函數(shù)創(chuàng)建，不是一種獨立的數(shù)據(jù)類型。占用14字節(jié)的存儲空間，取值范圍為79228162514264337593543950335(不帶小數(shù)點)或7.9228162514264337593543950335(帶28位小數(shù)點)，缺省值為0。(Decimal數(shù)據(jù)類型是在Excel 2000中引入的，在以前的版本中不能使用這種數(shù)據(jù)類型。該數(shù)據(jù)類型非常特殊，因為不能實際聲明它，它是Variant的子類型，必須使用CDec函數(shù)將一個變量轉(zhuǎn)換為Decimal數(shù)據(jù)類型)(6)Double存儲雙精度浮點數(shù)，占用8字節(jié)的存儲空間，取值范圍為負(fù)值：-1.79769313486232E3084.94065645841247E-324，正值：1.79769313486232E3084.94065645841247E-324，缺省值為0。(7)Integer表示從-32768-32767之間的整數(shù)，其中一位表示符號，占用2字節(jié)的存儲空間，缺省值為0。(8)Long表示存儲為4個字節(jié)空間的帶符號的數(shù)，其中一位表示符號，取值范圍為-2147483648-2147483647，缺省值為0。(9)Object包含對某個對象的引用(地址)，占用4字節(jié)的存儲空間，可對任何對象引用，缺省值為Nothing。(10)Single表示分?jǐn)?shù)、帶小數(shù)位或指數(shù)的數(shù)值等單精度數(shù)，占用4字節(jié)的存儲空間，取值范圍為負(fù)值：-3.402823E381.401298E-45，正值：1.401298E-453.402823E38，缺省值為0。(11)String可聲明定長和變長的String數(shù)據(jù)類型。其中，定長的String數(shù)據(jù)類型占用的存儲空間為字符串的長度，取值范圍為165400個字符，缺省值等于該字符串長度的空格數(shù)。變長的String數(shù)據(jù)類型能動態(tài)地加長或縮短以存儲要求的字符串?dāng)?shù)，占用的存儲空間為10字節(jié)加上字符串的長度，取值范圍為020億個字符，缺省值為零長字符串(“”)。 (12)VariantVariant字符串類型的存儲空間為22字節(jié)加上字符串的長度，其取值范圍與變長字符串?dāng)?shù)據(jù)類型的取值范圍相同，缺省值為Empty。Variant數(shù)字型的存儲空間為16字節(jié)，其取值范圍與Double數(shù)據(jù)類型的取值范圍相同，缺省值為Empty。(13)用戶自定義類型允許用戶創(chuàng)建一種特殊的數(shù)據(jù)類型，這種數(shù)據(jù)類型由VBA的內(nèi)部數(shù)據(jù)類型、數(shù)組、對象或其他用戶定義類型組成，其存儲空間為各個組成部分的存儲空間的總和，取值范圍與各個組成部分的數(shù)據(jù)類型的取值范圍一致，缺省值為各個組成部分的缺省值。各數(shù)據(jù)類型之間也可以相互轉(zhuǎn)換。常量(數(shù))常量即在程序執(zhí)行過程中不發(fā)生改變的值或字符串。使用Const語句聲明常量。如：Const Rate=0.25Const NumMonths As Integer=12Public Const myName As String=”BabyPig”而最后一個語句聲明了一個公共常量，應(yīng)放在模塊中所有過程之前聲明。VBA自身包含有許多內(nèi)置常數(shù)，它們的值都是VBA預(yù)先定義好的，使用內(nèi)部常數(shù)時無需定義這些常數(shù)的值。 幾個特殊的常數(shù)由于有好幾種不相同的“無效值”常數(shù)，VBA語言提供了好幾種方法，以檢驗?zāi)硞€變量是否為empty或null值，或者設(shè)置某個變量為empty或null值。(1) vbNull和VarType函數(shù)一起使用，用于確定變量是否包含null。(2) vbNullChar賦值或檢測null字符，null字符的值為Chr(0)，即vbNullChar常數(shù)相當(dāng)于將變量賦值為Chr(0)，可用于檢測變量，確定它的值是否是一個null字符。(3) vbNullString賦值或檢測零長(空)字符串。(4) Null關(guān)鍵字將null值賦給variant變量后，可以通過調(diào)用IsNull函數(shù)來檢測變量是否是Null值。(5) vbEmpty檢測某個variant變量是否初始化。(6) Nothing關(guān)鍵字只能和對象變量一起使用，以確定變量是否具有有效的對象引用，此外，Nothing關(guān)鍵字還可以用于銷毀當(dāng)前的對象引用。變量變量的主要作用是存取數(shù)據(jù)、提供了數(shù)據(jù)存放信息的容器。根據(jù)變量的作用域不同，可分為局部變量、全局變量，見后面的變量(常量)作用域和生存期介紹。變量命名要注意以下幾點：1、有效性。變量以字母開頭，中間可以出現(xiàn)數(shù)字和一些標(biāo)點符號，除下劃線( _ )作為連字符外，變量名稱不能有空格、加號(+)、減號(-)、逗號(，)、句點(.)等符號。2、VBA不區(qū)分大小寫。但在變量命名時，最好體現(xiàn)該變量的作用3、不能使用VBA中的關(guān)鍵字作為變量。4、變量名稱中不能有特殊類型的聲明字符(#、$、%、&或!)。5、變量名稱最多可以包含254個字符。聲明變量其語法為：Dim As 或：Private As 或：Public As 可以在一行中聲明多個變量，每個變量之間用逗號分隔開。還有一種聲明變量的方法是，將一個字符加在變量名稱后面，從而聲明變量的數(shù)據(jù)類型。如Dim MyVar%表示將變量MyVar聲明為整型。一些類型聲明符為：數(shù)據(jù)類型 類型聲明字符Integer %Long &Single !Double #Currency String $在模塊前加入Option Explicit語句，將強制聲明所使用的所有變量。對象變量在使用對象模型的屬性、方法和事件之前，必須創(chuàng)建一個對包含所需屬性、方法和事件的類的引用?？梢韵嚷暶饕粋€局部對象變量以存儲該對象引用，然后把對象引用賦給該局部變量。聲明對象變量的方法和聲明其他類型的變量基本上一樣。有三種聲明對象變量的方法：(1) Dim myObject As .此方法指向類的類型庫，但沒有給該變量賦予任何類的實例。此時，變量myObject被賦值為Nothing。若要用這種方式引用類，就必須利用“引用”對話框向工程添加一個對類模塊的引用。若要將類的實例引用賦予該變量，必須在使用該變量之前用Set語句賦值。如：Set myObject=.(2) Dim myObject As New .此方法將類的新實例引用賦給Object變量。同樣，要用這種方式引用類，必須先利用“引用”對話框向工程添加一個對類模塊的引用。(3) Dim myObject As Object此方法將myObject變量聲明為一般的Object數(shù)據(jù)類型，這在不能預(yù)先知道要創(chuàng)建的對象的數(shù)據(jù)類型時十分有用。此時，Object變量被賦值為Nothing。若要將對象引用賦值給該變量，必須使用CreateObject函數(shù)或GetObject函數(shù)?？梢杂肞rivate或Public語句替換Dim語句，且對象變量的作用域規(guī)則和其他類型的變量一樣。聲明對象變量可以顯著地簡化代碼且加快代碼的執(zhí)行速度。集合(Collection)對象集合對象是其他對象的一個容器。一般有四個方法：(1) Add方法添加一項到集合中。除了可以指定數(shù)據(jù)外還可以指定鍵值，通過鍵值可以訪問集合中的成員。(2) Count方法返回集合中的項的個數(shù)。(3) Item方法通過集合中的索引(即集合中項的序號)或鍵(假設(shè)該項添加到集合時指定了)檢索集合中的成員。(4) Remove方法通過集合中的索引或鍵刪除集合中的成員。可以使用WithEnd With構(gòu)造和For Each Next構(gòu)造很方便地處理對象和集合，其介紹可參見ExcelVBA編程系列之對象模型(2):初步理解和使用Excel對象模型一文。運算符運算符是用于完成操作的一系列符號，包括算術(shù)運算符、比較運算符、邏輯運算符、字符串運算符等?？捎糜谶B接一個或多個語言元素，或者完成一些運算以形成一個表達(dá)式。表達(dá)式表達(dá)式就是變量、常量、運算符的集合，可分為算術(shù)表達(dá)式、字符串表達(dá)式、賦值表達(dá)式、布爾表達(dá)式等數(shù)組數(shù)組是一組擁有相同名稱同類元素。定義數(shù)組后，即創(chuàng)建了數(shù)組。數(shù)組中單個的數(shù)據(jù)項稱為數(shù)組元素，用于訪問數(shù)組元素的編號稱為數(shù)組索引號，最小索引號和最大索引號稱為邊界。在VBA中，根據(jù)數(shù)組元素是否變化，分為固定大小的數(shù)組和動態(tài)數(shù)組，根據(jù)數(shù)組的維數(shù)又可分為一維數(shù)組和多維數(shù)組。1、創(chuàng)建數(shù)組用Dim語句來定義固定大小的數(shù)組，即聲明一個數(shù)組。如Dim myArray(9) As Integer上面的代碼創(chuàng)建一個名為myArray含有10個數(shù)組元素的一維數(shù)組。注意，所有VBA數(shù)組的下界均從0開始，因此上面的代碼所創(chuàng)建的數(shù)組元素從myArray(0)到myArray(9)。在Dim語句中不指明數(shù)組元素的個數(shù)來聲明動態(tài)數(shù)組，如Dim myDynamicArray() As Integer使用ReDim關(guān)鍵字重新定義數(shù)組的大小：ReDim myDynamicArray(10)也可以用ReDim關(guān)鍵字同時聲明一個動態(tài)數(shù)組并指定該數(shù)組的元素個數(shù)：ReDim myDynamicArray(5) As IntegerVBA沒有限制重新定義動態(tài)數(shù)組大小的次數(shù)，但在重新定義數(shù)組大小時，原有的數(shù)組數(shù)據(jù)就會丟失。如果需要保留原來的數(shù)據(jù)，可以使用Preserve關(guān)鍵字：ReDim Preserve myDynamicArray(5)需要注意的是，如果重新定義數(shù)組時減小了數(shù)組的大小，則會丟失被縮減了的那部分元素的數(shù)據(jù)。當(dāng)然，與聲明變量一樣，也可以用Public語句聲明公共數(shù)組。2、確定數(shù)組的邊界可以使用UBound函數(shù)和LBound函數(shù)分別獲取數(shù)組的最大邊界和最小邊界。默認(rèn)情況下，VBA的數(shù)組的下界是從0開始的，可以在模塊的聲明部分使用Option Base語句來改變模塊中數(shù)組的起始邊界。如Option Base 1該語句使數(shù)組元素的索引號從1開始。也可以在定義數(shù)組時指定數(shù)組的上界和下界，如Dim ( to ) As 3、多維數(shù)組多維數(shù)組可以在每個數(shù)組元素中存儲一組數(shù)據(jù)，因此，多維數(shù)組的每個數(shù)組元素都包含一個數(shù)組。與一維數(shù)組相同，可以使用下面的兩種方法創(chuàng)建多維數(shù)組：(1)Dim (，) As (2)Dim ( to ， to ，) As 與一維數(shù)組相似，多維數(shù)組也可以是動態(tài)的。4、引用數(shù)組中的元素可以使用數(shù)組名稱和一個索引號來引用數(shù)組中的某個特定的元素。內(nèi)置函數(shù)VBA中包含各種內(nèi)置函數(shù)，可以簡化計算和操作。在VBA表達(dá)式中使用函數(shù)的方式與使用工作表公式中函數(shù)的方式相同。在VBA代碼中，也可以使用很多Excel工作表函數(shù)，即使用WorksheetFunction對象調(diào)用工作表函數(shù)。但是不能使用具有與VBA內(nèi)置函數(shù)功能相同的工作表函數(shù)。基本語句1、控制程序流程語句(1) GoTo語句該語句將執(zhí)行的程序轉(zhuǎn)到指定的標(biāo)簽所在的語句指令，但不能轉(zhuǎn)移到過程之外的指令。例如，在進(jìn)行錯誤捕捉時，發(fā)生錯誤后，程序轉(zhuǎn)移至標(biāo)簽所在處執(zhí)行。(2) IfThen語句這種類型的語句用于條件判斷中，當(dāng)滿足條件時，執(zhí)行相應(yīng)的語句；當(dāng)條件不滿足時，執(zhí)行其它的操作。基本語法為：If Then If Then語句有幾種形式分別用于不同的情況：當(dāng)只有一個條件時，可使用下面的結(jié)構(gòu)：If Then Else 其中，Else子句可選。如果該語句不在同一行中，則應(yīng)在后面加上End If語句，即：If Then 指令End If或：If Then 指令Else 指令End If當(dāng)條件為真時，執(zhí)行Then后面的語句并結(jié)束IfThen語句的執(zhí)行，否則執(zhí)行Else后面的語句或結(jié)束IfThen語句的執(zhí)行。當(dāng)有兩個或多個條件時，可使用嵌套的If Then 結(jié)構(gòu)：If Then 指令ElseIf Then 指令Else 指令End If上面只是兩層嵌套，可以根據(jù)情況使用多層嵌套。當(dāng)條件為真時，執(zhí)行Then后面的語句并結(jié)束IfThen語句的執(zhí)行，否則判斷條件1，當(dāng)條件1為真時，執(zhí)行Then后面的語句并結(jié)束IfThen語句的執(zhí)行，否則執(zhí)行Else后面的指令。(3) Select Case語句當(dāng)需要作出三種或三種以上的條件判斷時，最后使用Select Case語句。其基本語法為：Select Case Case 條件表達(dá)式1 指令 Case 條件表達(dá)式2 指令 Case Else 指令End Select當(dāng)某個條件表達(dá)式與測試表達(dá)式相匹配時，則執(zhí)行其后的指令，否則執(zhí)行Else(如果有的話)后的指令，然后結(jié)束Select Case塊的執(zhí)行。此外，Select Case語句還可以嵌套。2、循環(huán)語句循環(huán)即重復(fù)執(zhí)行某段代碼。在VBA中，有多種可以構(gòu)成循環(huán)的語句結(jié)構(gòu)。(1) For Next 循環(huán)其語法如下：For To step 步長 指令 Exit For 指令Next 計數(shù)器從開始到結(jié)束，反復(fù)執(zhí)行For和Next之間的指令塊，除非遇到Exit For語句，將提前跳出循環(huán)。其中，步長和Exit For語句以及Next后的計數(shù)器均為可選項。ForNext循環(huán)中可以再包含F(xiàn)orNext循環(huán)，即ForNext循環(huán)可以嵌套使用。(2) Do While循環(huán)只有在滿足指定的條件時才執(zhí)行Do While循環(huán)。有兩種形式： 第一種形式Do While 條件 指令 Exit Do 指令Loop當(dāng)條件滿足時執(zhí)行指令。 第二種形式Do 指令 Exit Do 指令Loop While 條件先執(zhí)行指令，然后再判斷條件，如果條件滿足則再次執(zhí)行指令。其中Exit Do語句表示提前退出指令塊。(3) Do Until循環(huán)與Do While循環(huán)一樣，也有兩種形式； 第一種形式Do Until 條件 指令 Exit Do 指令Loop 第二種形式Do 指令 Exit Do 指令Loop Until 條件執(zhí)行指令，直到條件滿足時退出循環(huán)。(4) While Wend循環(huán)其語法為：While 指令Wend當(dāng)條件滿足時，則執(zhí)行指令。過程過程由一組完成所要求操作任務(wù)的VBA語句組成。子過程不返回值，因此，不能作為參數(shù)的組成部分。其語法為：Private|Public Static Sub (參數(shù)) 指令 Exit Sub 指令End Sub說明：(1) Private為可選。如果使用Private聲明過程，則該過程只能被同一個模塊中的其它過程訪問。(2) Public為可選。如果使用Public聲明過程，則表明該過程可以被工作簿中的所有其它過程訪問。但是如果用在包含Option Private Module語句的模塊中，則該過程只能用于所在工程中的其它過程。(3) Static為可選。如果使用Static聲明過程，則該過程中的所有變量為靜態(tài)變量，其值將保存。(4) Sub為必需。表示過程開始。(5) 為必需?？梢允褂萌我庥行У倪^程名稱，其命名規(guī)則通常與變量的命名規(guī)則相同。(6) 參數(shù)為可選。代表一系列變量并用逗號分隔，這些變量接受傳遞到過程中的參數(shù)值。如果沒有參數(shù)，則為空括號。(7) Exit Sub為可選。表示在過程結(jié)束之前，提前退出過程。(8) End Sub為必需。表示過程結(jié)束。如果在類模塊中編寫子過程并把它聲明為Public，它將成為該類的方法。函數(shù)函數(shù)(function)是能完成特定任務(wù)的相關(guān)語句和表達(dá)式的集合。當(dāng)函數(shù)執(zhí)行完畢時，它會向調(diào)用它的語句返回一個值。如果不顯示指定函數(shù)的返回值類型，就返回缺省的數(shù)據(jù)類型值。聲明函數(shù)的語法為：Private|Public Static Function (參數(shù)) As 類型 指令 函數(shù)名=表達(dá)式 Exit Function 指令 函數(shù)名=表達(dá)式End Function說明：(1) Private為可選。如果使用Private聲明函數(shù)，則該函數(shù)只能被同一個模塊中的其它過程訪問。(2) Public為可選。如果使用Public聲明函數(shù)，則表明該函數(shù)可以被所有Excel VBA工程中的所有其它過程訪問。不聲明函數(shù)過程的作用域時，默認(rèn)的作用域為Public。(3) Static為可選。如果使用Static聲明函數(shù)，則在調(diào)用時，該函數(shù)過程中的所有變量均保持不變。(4) Function為必需。表示函數(shù)過程開始。(5) 為必需?？梢允褂萌我庥行У暮瘮?shù)名稱，其命名規(guī)則與變量的命名規(guī)則相同。(6) 參數(shù)為可選。代表一系列變量并用逗號分隔，這些變量是傳遞給函數(shù)過程的參數(shù)值。參數(shù)必須用括號括起來。(7) 類型為可選。指定函數(shù)過程返回的數(shù)據(jù)類型。(8) Exit Function為可選。表示在函數(shù)過程結(jié)束之前，提前退出過程。(9) End Function為必需。表示函數(shù)過程結(jié)束。通常，在函數(shù)過程執(zhí)行結(jié)束前給函數(shù)名賦值。函數(shù)可以作為參數(shù)的組成部分。但是，函數(shù)只返回一個值，它不能執(zhí)行與對象有關(guān)的動作。如果在類模塊中編寫自定義函數(shù)并將該函數(shù)的作用域聲明為Public，這個函數(shù)將成為該類的方法。事件處理過程要對一個控件事件編寫事件處理程序，應(yīng)先打開窗體的代碼窗口并從可用對象的下拉列表中選擇所需的控件。然后，從該控件的可用事件下拉列表中選擇所用的事件。此時，對事件處理程序的定義語句就會自動出現(xiàn)在代碼窗口中，就可以直接編寫事件處理程序了。在Excel中，有下面幾類事件，即Excel應(yīng)用程序事件、工作簿事件、工作表事件、圖表事件、用戶窗體事件等。類模塊類模塊是存放共享變量以及共享代碼的存儲庫。創(chuàng)建一個類模塊，實際上也是在創(chuàng)建一個COM(組件對象模型)接口。因此，類模塊允許通過一個由屬性、方法和事件組成的可編程接口向外界描述應(yīng)用程序，同時保證保留對應(yīng)用程序的控制權(quán)。也就是說，類模塊能夠讓程序?qū)崿F(xiàn)“封裝”，這樣，在其它工程中可以直接使用某類模塊而不需要訪問源代碼。此外，可以使用類來創(chuàng)建自已的庫，如果要使用的話，只需要在任何新的工程中添加一個對該類的引用就行了。并且，如果要改變程序，只需對類模塊改動就行了，而不需要在程序的每個部分都作改動。屬性過程屬性過程(property procedure)是特殊的過程，用于賦予和獲取自定義屬性的值。屬性過程只能在對象模塊如窗體或類模塊中使用。有三種屬性過程：Property Let 給屬性賦值Property Get 獲取屬性的值Property Set 將對象引用賦給屬性引用調(diào)用子過程和函數(shù)過程子過程可以用下面三種方法調(diào)用。第一種使用Call語句：Call DoSomething(參數(shù)1，參數(shù)2，)如果使用Call語句，就必須用小括號將參數(shù)列表括起來。第二種是直接利用過程名：DoSomething 參數(shù)1，參數(shù)2，此時，不用在參數(shù)列表兩邊加上括號。如果不想使用函數(shù)的返回值，可以用上述任一種方法調(diào)用函數(shù)。否則，可以用函數(shù)名作為表達(dá)式的組成部分，如If GetFunctionResult(parameter)=1 Then如果用函數(shù)調(diào)用作為表達(dá)式的一部分，參數(shù)列表必須放在小括號中。第三種是使用Run方法。在過程間傳遞參數(shù)在很多情況下，需要在子過程或函數(shù)中調(diào)用另一個自定義函數(shù)或子過程，這時，在被調(diào)用過程中就要用到在調(diào)用過程中使用的某個變量。因此，可把該變量作為參數(shù)傳遞給被調(diào)用過程。不管被調(diào)用過程是在同一模塊、同一工程中的過程，還是在遠(yuǎn)程服務(wù)器上的類中的一個方法，從一個過程向另一個過程傳遞變量的原理都是一樣的。被調(diào)用過程(而不是調(diào)用過程)決定了變量如何從調(diào)用過程傳遞到被調(diào)用過程。1、VBA允許用兩種不同的方式在過程和組件之間傳遞參數(shù)。在子過程或函數(shù)的定義部分，可以指定參數(shù)列表中的變量的傳遞方式：ByRef(按引用)或者ByVal(按值)。(1) ByRef這是VBA中在過程間傳遞變量的默認(rèn)方法。ByRef是指按引用傳遞變量，即傳遞給被調(diào)用過程的是原變量的引用。因此，如果改變了被調(diào)用過程中的變量值，其變化就會反映到調(diào)用過程中的那個變量，因為它們實際上是同一個變量。(2) ByVal如果使用ByVal關(guān)鍵字傳遞變量，被調(diào)用過程獲得的就是該變量的獨立副本。因此，改變被廟用過程中該變量的值不會影響調(diào)用過程中該變量原來的值。2、Optional參數(shù)Optional關(guān)鍵字用來指定某個特定的參數(shù)并不一定要傳遞，即為可選參數(shù)。但是，該參數(shù)必須放在最后。3、ParamArray使用ParamArray關(guān)鍵字能夠使過程按受一組數(shù)目可變的參數(shù)。ParamArray參數(shù)必須是參數(shù)列表中的最后一個參數(shù)，而且不能在使用了Optional關(guān)鍵字的參數(shù)列表中使用ParamArray參數(shù)。變量(常量)作用域和生存期有時需要在工程內(nèi)的所有過程中使用某個變量，而有時某些變量又只需要在某些特定的過程中用到，變量的這種可見性稱為變