資源描述：
《宏運用入門及數(shù)組運用》由會員上傳分享，免費在線閱讀，更多相關(guān)內(nèi)容在教育資源-天天文庫。
1、1、宏命令的使用方法1．1按圖1步驟操作可添加控件及編寫相關(guān)代碼，圖2為代碼編寫窗口圖1在工作表中添加控件圖2編寫控件代碼1．2按圖3所示步驟自定義函數(shù)后就可以像使用Excel函數(shù)一樣運用它了，如圖4圖3自定義函數(shù)圖4自定義函數(shù)的使用1．3按圖5所示步驟編寫自己的宏命令，例如在代碼窗口輸入如下代碼：Subsheetcount()DimnumAsIntegernum=ThisWorkbook.Sheets.CountRange("a1")=numEndSub此函數(shù)功能是求取工作薄中所有工作表的個數(shù)，按圖6方法運行該宏命令，也可以按圖7所示步驟執(zhí)行宏命令圖5編
2、寫宏命令圖6運行宏命令圖7在Excel中調(diào)用宏命令2、用Array創(chuàng)建數(shù)組按Alt+F11打開VBE窗口，插入一新的模塊，在代碼窗口中寫入代碼：Subtest()紅繩子=Array("辣1","辣2","辣3","辣4","辣5","辣6","辣7","辣8","辣9","辣10")EndSub按F8，逐行運行代碼，程序成功創(chuàng)建了一個數(shù)組，數(shù)組名稱是“紅繩子”，"辣1","辣2","辣3","辣4","辣5","辣6","辣7","辣8","辣9","辣10"是數(shù)組元素。用Array()創(chuàng)建數(shù)組，各元素之間用逗號隔開。元素如果是文本，要用半角引號作定界符。
3、練習(xí)，創(chuàng)建兩個數(shù)組：⑴數(shù)組名為cName，數(shù)據(jù)為8個同學(xué)的姓名：林思明、曾玉婷、曾國文、林偉權(quán)、林興發(fā)、劉卓懷、曾仙婷、林平⑵數(shù)組名為cj，數(shù)據(jù)為8個數(shù)值：99,85,92.5,70,78.5,65,84,100參考答案：數(shù)組入門01.xls點擊瀏覽該文件★推薦：ExcelHome技術(shù)論壇的最佳學(xué)習(xí)方法★山菊花--------------------------------------------------------------------------------3、我們已經(jīng)初步認(rèn)識了數(shù)組，數(shù)組是把一組數(shù)保存到一個數(shù)組變量中，它有兩個重要特征。⑴它是一
4、個變量，對一組數(shù)進(jìn)行統(tǒng)一管理帶來方便。上面建立的姓名數(shù)組，我們要把它寫入到工作表區(qū)域A1向右連續(xù)8個單元格中，可用命令：Range(“a1:h1”)=cname我們認(rèn)識的這類數(shù)組，稱為一維數(shù)組，一維數(shù)組是一個水平數(shù)組，相當(dāng)于工作表中的行。如果要把姓名按垂直方向填充到單元格，可轉(zhuǎn)置命令。如，把這個數(shù)組寫入到A1:A8單元格中：Range(“a1:a8”)=WorksheetFunction.Transpose(cname)練習(xí)：把數(shù)組cname分別寫入到單元格C4:J4、D8:D15。答案：數(shù)組入門02.xls點擊瀏覽該文件⑵第二個重要的特征，是數(shù)組元素的有
5、序性，一組數(shù)據(jù)有序地保存到數(shù)組變量中。數(shù)組中，用數(shù)組名加序號(稱索引值)構(gòu)成唯一的名稱對元素進(jìn)行引用。元素與序號一一對應(yīng)，根據(jù)序號，可以修改和讀取指定位置上的元素。把一串姓名保存到數(shù)組cName中，數(shù)據(jù)在數(shù)組中按順序保存，默認(rèn)從0開始，依次是1、2、3……，用cName(0)表示第一個姓名、cName(1)表示第二個姓名，等等。在工作表中插入一個按鈕，點擊按鈕，把姓名填入單元格A1:A8中：PrivateSubCommandButton1_Click()cname=Array("林思明","曾玉婷","曾國文","林偉權(quán)","林興發(fā)","劉卓懷","曾仙婷
6、","林平")Fori=1To8Range("a"&i)=cname(i-1)NextEndSub數(shù)組序號(索引值)默認(rèn)從0開始，也可以通過命令OPTIONBASE1修改為從1開始。該命令寫在模塊的前面。如果設(shè)定索引值從1開始，則上面的代碼修改為：PrivateSubCommandButton1_Click()cname=Array("林思明","曾玉婷","曾國文","林偉權(quán)","林興發(fā)","劉卓懷","曾仙婷","林平")Fori=1To8Range("a"&i)=cname(i)‘工作表行號與數(shù)組序號相吻合NextEndSub參考：數(shù)組入門03.xl
7、s點擊瀏覽該文件--------------------------------------------------------------------------------4、想起瑞士軍刀Array()很好用，但有時Split()更好用，我們?nèi)〕鲞@瑞士軍刀的第二利器。Split()把一個文本，根據(jù)指定的分隔符，建立一個數(shù)組?？匆粋€實例：單元格A1中有一串姓名：朱清燕(女),林鑫,林秋靜(女),林永鑫,林云艷(女),林嘉惠(女),曾文婷(女),林悅,陳誠,林偉健,賴紫嵐(女),曾雁(女),賴文強,鐘娟(女),張琪(女),林文彬,黃曉婷(女),李朕,林依婷
8、(女),林佳利(女),曾德福要求：用Split()，把這串文本創(chuàng)建
