VBA常用英語(yǔ)單詞

VBA常用英語(yǔ)單詞Sub開(kāi)始End結(jié)束Range單元格，單元格區(qū)域Msgbox輸出函數(shù)Inputbox輸入函數(shù)Cells所有單元格Sheets工作表集合Worksheets工作表集合Workbooks工作簿集合Thisworkbook:代碼所在的工作簿Activeworkbook活動(dòng)工作簿Ativecell活動(dòng)單元格Dim定義變量關(guān)鍵字Redim重新定義變量關(guān)鍵字Integer整型，簡(jiǎn)寫(xiě)%Long長(zhǎng)整型，簡(jiǎn)寫(xiě)&Single單精度簡(jiǎn)寫(xiě)!Double雙精度簡(jiǎn)寫(xiě)#String字符串型$Variant變體型，有的叫做萬(wàn)能型，如果不定義就是這個(gè)變體型Object對(duì)象Usedrange用過(guò)的區(qū)域Union聯(lián)合Intersect交叉Resize重新定義區(qū)域大小CurrentRegion：相連的Value值Call呼叫Visible可見(jiàn)性Rows所有的行Columns所有列Createobject引用動(dòng)態(tài)庫(kù)文件函數(shù)Dictionary字典Regexp正則ApplicationExcel里最高對(duì)象Format格式函數(shù)Timer記時(shí)器WorksheetFunction工作表函數(shù)Transpose工作表里的轉(zhuǎn)置函數(shù)Add添加?Before前面After后面Kye關(guān)鍵字Item條目對(duì)Remove清空Removeall清空所有Exists存在Count點(diǎn)數(shù)Array數(shù)組函數(shù)Preserve保存Ubound上界Lbound下界Erase清空數(shù)組Split分割Join連接，組合Filter篩選Index工作表引用函數(shù)Function函數(shù)Volatile易失性ColorIndex顏色索引Interior底紋Font字體Show顯示Unload關(guān)閉窗體Onkey按鈕事件Ontime事件Delete刪除Open打開(kāi)SaveSs保存????????????????vba語(yǔ)句OptionExplicit'強(qiáng)制對(duì)模塊內(nèi)所有變量進(jìn)行聲明OptionBase1'指定數(shù)組的第一個(gè)下標(biāo)為1⑶OnErrorResumeNext'忽略錯(cuò)誤繼續(xù)執(zhí)行VBA代碼,避免出現(xiàn)錯(cuò)誤消息OnErrorGoTo100'當(dāng)錯(cuò)誤發(fā)生時(shí)跳轉(zhuǎn)到過(guò)程中的某個(gè)位置OnErrorGoTo0'恢復(fù)正常的錯(cuò)誤提示=False'在程序執(zhí)行過(guò)程中使出現(xiàn)的警告框不顯示?=True'在程序執(zhí)行過(guò)程中=False'關(guān)閉屏幕刷新=True'打開(kāi)屏幕刷新(10)??()'創(chuàng)建一個(gè)新的工作簿(11)??Workbooks(“”).Activate'激活名為book1的工作簿'保存工作簿'關(guān)閉當(dāng)前工作簿(14)??'獲取活動(dòng)工作薄中工作表數(shù)(15)????'返回活動(dòng)工作薄的名稱(chēng)‘返回當(dāng)前工作簿名稱(chēng)‘返回當(dāng)前工作簿路徑和名(18)‘當(dāng)前工作表中已使用的行數(shù)‘獲取工作表的行數(shù)(注：考慮兼容性)(20)??Sheets(Sheet1).Name=“Sum”'將Sheet1命名為Sum(21)??Before:=Worksheets(1)'添加一個(gè)新工作表在第一工作表前(22)??After:='將當(dāng)前工作表移至工作表的最后(23)??Worksheets(Array(“sheet1”,”sheet2”)).Select'同時(shí)選擇工作表1和工作表2(24)??Sheets(“sheet1”).Delete或Sheets(1).Delete'刪除工作表1(25)??‘刪除當(dāng)前工作表中所有的條件格式(26)??‘取消當(dāng)前工作表所有超鏈接(27)選擇當(dāng)前活動(dòng)單元格所包含的范圍，上下左右無(wú)空行(28)??‘選定當(dāng)前工作表的所有單元格(29)??Range(“A1”).ClearContents'清除活動(dòng)工作表上單元格A1中的'清除選定區(qū)域內(nèi)容Range("A1:D4").Clear'徹底清除A1至D4單元格區(qū)域的內(nèi)容，包括格式(30)??'清除工作表中所有單元格的內(nèi)容(31)(1,0).Select'活動(dòng)單元格下移一行，同理，可下移一列(32)??Range(“A1”).CopyRange(“B1")‘復(fù)制單元格A1,粘貼到單元格B1中Range(“A1:D8”).CopyRange(“F1”)'將單元格區(qū)域復(fù)制到單元格F1開(kāi)始的區(qū)域中Range("A1:D8").CutRange(“F1")’剪切單元格區(qū)域A1至D8,復(fù)制到單元格F1開(kāi)始的區(qū)域中Range(“A1”).Sheets(“Sheet2”).Range(“A1”)'復(fù)制包含A1的單元格區(qū)域到工作表2中以A1起始的單元格區(qū)域中注：CurrentRegion屬性等價(jià)于定位命令，由一個(gè)矩形單元格塊組成，周?chē)且粋€(gè)或多個(gè)空行或列'活動(dòng)窗口中選擇的單元格數(shù)(37)??'當(dāng)前選中區(qū)域的單元格數(shù)Range(“A1”).‘獲取單元格A1背景色(39)??‘返回當(dāng)前工作表的單元格數(shù)Range(“B3”).Resize(11,3)Union(Range(“A1:A9”),Range(“D1:D9”))區(qū)域連接Intersect(Range(“A1:B9”),Range(“A1:D9”)))‘返回的交叉區(qū)域(43)??‘當(dāng)前選中的單元格區(qū)域中的列數(shù)‘當(dāng)前選中的單元格區(qū)域中的行數(shù)??‘獲取單元格區(qū)域中使用的第一行的行號(hào)(46)??'使用工作表函數(shù)檢查A1單元格中的數(shù)據(jù)是否為數(shù)字Range(“A:A”).Find'激活單元格區(qū)域A列中最大值的單元格MsgBox“Hello!”'消息框中顯示消息HelloAns=MsgBox("Continue”,vbYesNo)'在消息框中點(diǎn)擊“是"按鈕，貝UAns值為vbYes;點(diǎn)擊“否”按鈕，則Ans值為vbNo。(50)??‘顯示用戶(hù)窗體(51)LoadUserform1‘加載一個(gè)用戶(hù)窗體,但該窗體處于隱藏狀態(tài)(52)??‘隱藏用戶(hù)窗體UnloadUserform1或UnloadMe‘卸載用戶(hù)窗體0‘將窗體設(shè)置為無(wú)模式狀態(tài)(55)??=False'禁用所有事件=True'啟用所有事件Setd=CreateObject‘創(chuàng)建一個(gè)Dictionary對(duì)象變量(58)??"a","Athens"'為對(duì)象變量添加關(guān)鍵字和條(59)??"z","macro"'設(shè)置Ctrl+I鍵為macro過(guò)程的快捷鍵(60)??=False‘退出剪切/復(fù)制模式(61)??True'無(wú)論何時(shí)工作表中任意單元格重新計(jì)算，都會(huì)強(qiáng)制計(jì)算該函數(shù)False'只有在該函數(shù)的一個(gè)或多個(gè)參數(shù)發(fā)生改變時(shí)，才會(huì)重新計(jì)算該函數(shù)(63)??‘清除程序運(yùn)行過(guò)程中所有的錯(cuò)誤‘關(guān)閉所有打開(kāi)的工作簿‘返回當(dāng)前工作簿的路徑(注:若工作簿未保存,則為空)‘返回工作簿的存儲(chǔ)值(若已保存則為False)=False‘隱藏工作簿=True‘顯示工作簿(69)??("B").Insert'在A列右側(cè)插入列，即插入B列("E").Cut??("B").Insert??70,71兩句將E列數(shù)據(jù)移至B歹U,原B列及以后的數(shù)據(jù)相應(yīng)后移‘計(jì)算當(dāng)前工作表(“sheet1”).Visible=xlSheetHidden‘正常隱藏工作表，同在Excel菜單中選擇“格式——工作表——隱藏”操作一樣(“sheet1”).Visible=xlSheetVeryHidden‘隱藏工作表，不能通過(guò)在Excel菜單中選擇“格式——工作表——取消隱藏”來(lái)重新顯示工作(“sheet1”).Visible=xlSheetVisible‘顯示被隱藏的工作表(76)??(1).ProtectContents‘檢查工作表是否受到保護(hù)(77)??Count:=2,Before:=(2)或(2),,2??‘在第二個(gè)工作表之前添加兩個(gè)新的工作表(78)(3).Copy‘復(fù)制一個(gè)工作表到新的工作簿(79)??(3).Copy(2)‘復(fù)制第三個(gè)工作表到第二個(gè)工作表之前(1).Activate‘當(dāng)前工作簿中的第一個(gè)工作表被激活(81)??("Sheet1").Rows(1).Hidden=True‘將工作表Sheet1中的1隱藏=True‘將當(dāng)前工作表中活動(dòng)單元格所在的行隱藏(83)??(“A:A”).‘自動(dòng)調(diào)整當(dāng)前工作表A列列寬‘選中當(dāng)前工作表中常量和文本單元格‘選中當(dāng)前工作表中常量和文本及錯(cuò)誤值單元格(86)??‘獲取A列的下一個(gè)空單元格(87)SetFirstCell=Range.Range(“A1”)‘設(shè)置某單元格區(qū)域左上角單元格(88)??Now+TimeValue("00:00:15"),"myProcedure"‘等待15秒后運(yùn)行myProcedure過(guò)程(89)Application對(duì)象(90)??‘返回應(yīng)用程序的用戶(hù)名(91)??‘返回調(diào)用函數(shù)的工作簿名稱(chēng)(92)??="請(qǐng)等待……”’將文本寫(xiě)到狀態(tài)欄(93)??=False‘將狀態(tài)欄重新設(shè)置成正常狀態(tài)(94)??(Array(“Sun”,”Mon”,”Tur”,”Wed”,”Thu”,”Fri”,”Sat”))‘返回一個(gè)垂直的數(shù)組(95)??‘返回活動(dòng)單元格的地址(注:返回的是絕對(duì)地址)(96)??‘返回活動(dòng)工作表的名稱(chēng)(97)??‘返回活動(dòng)窗口的標(biāo)題(98)‘返回活動(dòng)工作簿的名稱(chēng)(99)??‘返回所選區(qū)域的地址(100)‘返回當(dāng)前工作簿的名稱(chēng)(101)??Range(A1:A10).Value=‘將一含有10個(gè)元素的數(shù)組轉(zhuǎn)置成垂直方向的工作表單元格區(qū)域(A1至A10)注：因?yàn)楫?dāng)把一維數(shù)組的內(nèi)容傳遞給某個(gè)單元格區(qū)域時(shí)，該單元格區(qū)域中的單元格必須是水平方向的，即含有多列的一行。若必須使用垂直方向的單元格區(qū)域，則必須先將數(shù)組進(jìn)行轉(zhuǎn)置，成為垂直的。Cells,1).End(xlUp).Row+1'返回A列最后一行的下一行(103)??(“A1”)‘返回區(qū)域左上角的單元格(104)??("A:B").SortKey1:=Columns("B"),Key2:=Columns("A"),Header:=xlYes‘兩個(gè)關(guān)鍵字排序，相鄰兩列，B列為主關(guān)鍵字，A列為次關(guān)鍵字，升序排列(105)??(“A1”).HasFormula‘檢查單元格或單元格區(qū)域中的第一個(gè)單元格是否含有公式或‘工作表中單元格是否含有公式(106)??‘單元格所在的整列‘單元格所在的整行‘返回rng區(qū)域的地址(109)??Range(“D5:D10”).Cells(1,1)‘返回單元格區(qū)域D5:D10中左上角單元格(110)??‘活動(dòng)單元格所在的行數(shù)(111)‘活動(dòng)單元格所在的列數(shù)(112)??Set