資源描述:
《單元格在VBA表示方法》由會(huì)員上傳分享,免費(fèi)在線閱讀,更多相關(guān)內(nèi)容在應(yīng)用文檔-天天文庫(kù)。
1、單元格在VBA的表示方法:1、Range("單元格地址")??如Range("a1")??即為A1單元格2、CELLS(行,列)??如CELLS(1,1)也為A1單元格,CELLS(2,1)為A2單元格工作表在VBA中表示方法:sheets("工作表名")每個(gè)函數(shù)前都要加Application.WorksheetFunction.?答:如果是單個(gè)調(diào)用必須加如果是多個(gè)調(diào)用就可以用WITH語(yǔ)句省去后面的如Sub矩形1_單擊()DimiAsIntegerFori=1To20Sheets("sheet1").Cells(i,1)=iNextWithApplicatio
2、n.WorksheetFunctionRange("a21").Value=.Sum(Range("a1:a20"))??????????注意SUM前面要有個(gè)點(diǎn)才行Range("a22").Value=.Average(Range("a1:a20"))EndWithEndSubCOLUMN是指列,COLUMNS是指列的集合ROW是表示行,ROWS是行的集合如果用Sheets("sheet1").columns.select??會(huì)選定所有列即整個(gè)工作表SUB語(yǔ)句,需要有個(gè)事件觸發(fā)它,才能執(zhí)行,就比如一個(gè)箱子,只有去搬、推等外力施加與它時(shí),它才會(huì)動(dòng)。設(shè)置個(gè)按紐目的
3、就是為了執(zhí)行SUB語(yǔ)句Range("A1:A22").ClearContents該語(yǔ)句是清除內(nèi)容的語(yǔ)句Private的中文意思是私有的,PrivateSub中的程序只能在本程序內(nèi)部運(yùn)行而不能被其他程序調(diào)用,而SUB語(yǔ)句則可以如:SUBBB()ENDSUBSUBAA()??BB??????????ENDSUBRange("B65536").End(xlUp).Row是指B列最后一個(gè)非空單元格,END(XLUP)是向上數(shù)第一個(gè)非空單元格,為了準(zhǔn)備找到最下面的非空單元格,當(dāng)然要從RANGE("B65536")開始向上找了MSGBOX有時(shí)帶()比如AAA=MSGBOX
4、()這種情況下可以取到用戶點(diǎn)擊對(duì)話框按紐的返回值,以確定下一步該怎么做而不帶括號(hào)只是提示的作用,不能取得返回的值如MSGBOX......以下是引用playgirl在2004-10-515:18:00的發(fā)言:那為為什么要用K=K+1。如果向下數(shù)第一個(gè)非空單元格就是range("b1").end(xldown).row向左數(shù)第一個(gè)非空單元格:range("iv1").end(xlleft).column向右數(shù)第一個(gè)非空單元格:range("a1").end(xlright).column是這樣嗎?謝謝!向右是End(xltoright)??向左End(xltol
5、eft)K=K+1是在原來(lái)的基礎(chǔ)加1如選取Sheet1第一行有內(nèi)容單元格區(qū)域(假設(shè)A1不為空):sheets("sheet1").range("a1",range("a1").end(xltoright)).select選取B列有內(nèi)容單元格區(qū)域:(假設(shè)B1不為空):sheets("sheet1").range("B1",range("B65536").end(XLUP)).select以下是引用老荷才露在2004-10-516:30:00的發(fā)言:a=Application.WorksheetFunction.CountIf(Range("b:b"),">106
6、")Ifa>1ThenMsgBox"大于106的數(shù)有"&a&"個(gè)",1最后這個(gè),1怎么解釋;a這個(gè)變量是不是省略了dim的聲明,不聲明也行嗎?蘭老師的最后一句中的1+64,怎么解釋其實(shí)這個(gè)程序是加了個(gè)判斷,如果統(tǒng)計(jì)的結(jié)果有>106的值(即A>1)就顯示提示對(duì)話框,否則就不顯示,1+64參考下面的貼子:http://club.excelhome.net/dispbbs.asp?boardid=5&star=13&replyid=297359&id=62008&skin=0&page=1變量在程序中如果事先約定,就必須聲明,如果沒有約定,就根據(jù)實(shí)際情況而定,一般來(lái)
7、說(shuō)聲明最好,這樣可以減少運(yùn)行程序所占用的內(nèi)存.注:約定:相關(guān)圖片如下(VBE編輯器---工具---選項(xiàng))此主題相關(guān)圖片如下:Functionpanduan(aaAsRange)????????Ifaa.Value>0Thenpanduan="大于零"ElseIfaa.Value=0Thenpanduan="等于零"Elsepanduan="小于零"EndIfEndFunctionFunctionpanduan(aaAsRange)??????panduan即是你定義的函數(shù)名稱,就如IF,MATCT等函數(shù)名稱一樣(aaAsRange)??aa是該函數(shù)的參數(shù),aa
8、AsRange是定義該參數(shù)為單元格,在