資源描述：
《【8A版】VBA常用代碼大全》由會員上傳分享，免費在線閱讀，更多相關(guān)內(nèi)容在應(yīng)用文檔-天天文庫。
1、【MeiWei81-優(yōu)質(zhì)實用版文檔】前言我們平時在工作表單元格的公式中常常使用函數(shù)，EGcel自帶的常用的函數(shù)多達300多個，功能強大，豐富多彩，但是在VBA中不能直接應(yīng)用，必須在函數(shù)名前面加上對象，比如：Application.WorksheetFunction.Sum(arg1,arg2,arg3)。而能在VBA中直接應(yīng)用的函數(shù)也有幾十個，下面將逐一詳細介紹常用的40個VBA函數(shù)，以供大家學(xué)習(xí)參考。第1.1例ASC函數(shù)一、題目： 要求編寫一段代碼，運行后得到字符串”EGcel”的首字母和”e”的ASCII值。二、代碼：Sub示例_1_01()DimmyNum1%
2、,myNum2%myNum1=Asc("EGcel")'返回69myNum2=Asc("e")'返回101[a1]="myNum1=":[b1]=myNum1[a2]="myNum2=":[b2]=myNum2EndSub三、代碼詳解1、Sub示例_1_01()：宏程序的開始語句。2、DimmyNum1%,myNum2%：變量myNum1和myNum2聲明為整型變量。也可以寫為DimmyNum1AsInteger。Integer變量存儲為16位（2個字節(jié)）的數(shù)值形式，其范圍為-32,768到32,767之間。Integer的類型聲明字符是百分比符號(%)。3、myNu
3、m1=Asc("EGcel")：把Asc函數(shù)的值賦給變量myNum1。Asc函數(shù)返回一個Integer，代表字符串中首字母的字符的ASCII代碼。語法Asc(string)必要的string（字符串）參數(shù)可以是任何有效的字符串表達式。如果string中沒有包含任何字符，則會產(chǎn)生運行時錯誤。4、myNum2=Asc("e")：把Asc函數(shù)的值賦給變量myNum2。這里返回小寫字母e的ASCII代碼101。【MeiWei81-優(yōu)質(zhì)實用版文檔】【MeiWei81-優(yōu)質(zhì)實用版文檔】5、[a1]="myNum1=":[b1]=myNum1：把字符串“myNum1=“賦給A1單元
4、格，把變量myNum1的值賦給B1單元格。6、[a2]="myNum2=":[b2]=myNum2：把字符串“myNum2=“賦給A2單元格，把變量myNum2的值賦給B2單元格。7、EndSub：程序的結(jié)束語句，和“Sub示例_1_01（）”相對應(yīng)。第1.2例Chr函數(shù)一、題目""： 要求編寫一段代碼，運用Chr函數(shù)將ASCII值轉(zhuǎn)換為對應(yīng)的字符。二、代碼：Sub示例_1_02()DimmyChar1$,myChar2$myChar1=Chr(69)'返回E。myChar2=Chr(101)'返回e。[a1]="myChar1=":[b1]=myChar1[a2]
5、="myChar2=":[b2]=myChar2EndSub三、代碼詳解1、Sub示例_1_02()：宏程序的開始語句。2、DimmyChar1$,myChar2$：變量myChar1和myChar2聲明為字符串變量。也可以寫為DimmyChar1AsString。String之字符碼的范圍是0到255。字符集的前128個字符（0到127）對應(yīng)于標準的U.S.鍵盤上的字符與符號。這前128個字符與ASCII字符集中所定義的相同。后128個字符（128到255）則代表特殊字符，例如國際字符，重音符號，貨幣符號及分數(shù)。String的類型聲明字符為美元號($)。3、myCh
6、ar1=Chr(69)：把Chr(69)的值賦給變量myChar1。這里返回大寫字母E。Chr函數(shù)根據(jù)字符代碼返回一個字符。語法Chr(charcode)必要的charcode（字符代碼）參數(shù)是用來識別某字符的。4、myChar2=Chr(101)：把Chr函數(shù)的值賦給變量myChar2。這里返回小寫字母e。5、[a1]="myChar1=":[b1]=myChar1：把字符串“myChar1=“賦給A1單元格，把變量myChar1的值賦給B1單元格?！綧eiWei81-優(yōu)質(zhì)實用版文檔】【MeiWei81-優(yōu)質(zhì)實用版文檔】6、[a2]="myChar2=":[b2]=
7、myChar2：把字符串“myChar2=“賦給A2單元格，把變量myChar2的值賦給B2單元格。7、EndSub：程序的結(jié)束語句，和“Sub示例_1_02（）”相對應(yīng)。第1.3例Choose函數(shù)一、題目： 要求編寫一段代碼，運用Choose函數(shù)根據(jù)指定數(shù)字選擇對應(yīng)的字符串。二、代碼：Sub示例_1_03()DimNum%Num=2MsgBoGChoose(Num,"一月","二月","三月")EndSub三、代碼詳解1、Sub示例_1_03()：宏程序的開始語句。宏名為示例_1_03。2、DimNum%：變量Num聲明為整型變量。3、Num=2
