62、http://www.yesky.com/20010724/190094_3.shtml Microsoft Excel是一款功能非常強(qiáng)大的電子表格軟件。它可以輕松地完成數(shù)據(jù)的各類數(shù)學(xué)運(yùn)算,并用各種二維或三維圖形形象地表示出來,從而大大簡化了數(shù)據(jù)的處理工作。但若僅利用Excel的常用功能來處理較復(fù)雜的數(shù)據(jù),可能仍需進(jìn)行大量的人工操作。但Excel的強(qiáng)大遠(yuǎn)遠(yuǎn)超過人們的想象--宏的引入使其具有了無限的擴(kuò)展性,因而可以很好地解決復(fù)雜數(shù)據(jù)的處理問題。
隨著支持Windows的應(yīng)用程序的不斷增多和功能的不斷增強(qiáng),越來越多的程序增加了宏處理來方便用戶的自由擴(kuò)展。但初期各應(yīng)用程序所采用的宏語言并不統(tǒng)一,這樣用戶每使用一種應(yīng)用程序時(shí)都得重新學(xué)習(xí)一種宏語言。為了統(tǒng)一各種應(yīng)用程序下的宏,Microsoft推出了VBA(Visual Basic for Applications)語言。
VBA是從流行的Visual Basic編程語言中派生出來的一種面向應(yīng)用程序的語言,它適用于各種Windows應(yīng)用程序,可以解決各應(yīng)用程序的宏語言不統(tǒng)一的問題。除此之外,使用 VBA語言還有如下優(yōu)點(diǎn):1、VBA是一種通用程序語言,通過它不僅可以共享Microsoft相關(guān)的各種軟件(如Excel、Word、 Access)……,而且隨著其它的一些軟件(如大名鼎鼎的AutoCAD2000)等對VBA的支持,這些軟件也已進(jìn)入到了VBA的控制范圍;2、可以將用VBA編寫的程序復(fù)制到Visual Basic中調(diào)試并運(yùn)行,從而實(shí)現(xiàn)用Visual Basic來控制有關(guān)的應(yīng)用程序;3、VBA提供的大量內(nèi)部函數(shù)大大簡化了用戶的操作。
對于而今的宏,不僅語言統(tǒng)一規(guī)范,而且其功能也已非常強(qiáng)大。但在大多數(shù)介紹Excel的"傻瓜書"、"指南"、"入門與提高"等參考書中往往略過不提,或淺淺帶過,讀者從中獲得的有關(guān)知識往往不足以應(yīng)付處理復(fù)雜數(shù)據(jù)的需求。為了完成工作,就讓我們一起來學(xué)習(xí)"宏"的妙用吧。
一)、宏的自學(xué)
首先需要明確的是,本文不可能教會您關(guān)于宏的所有內(nèi)容。您需要學(xué)會利用"錄制宏"的方法來學(xué)習(xí)宏:點(diǎn)擊Excel"工具"下拉菜單中"宏"下?quot;錄制新宏",此后可象平時(shí)一樣進(jìn)行有關(guān)操作,待完成后停止錄制。然后再點(diǎn)擊"工具"下拉菜單中"宏"下"宏"的"編輯"選項(xiàng)即可打開剛才所錄制的宏的Visual Basic源程序,并且可以在此時(shí)的"幫助"下拉菜單中獲得有關(guān)的編程幫助。對錄制宏進(jìn)行修改不僅可以學(xué)習(xí)宏的使用,還能大大簡化宏的編寫。
二)、基本概念
為了學(xué)習(xí)Excel中的宏,我們需要先了解以下一些基本概念。
1、工作簿:Workbooks、Workbook、ActiveWorkbook、ThisWorkbook
Workbooks集合包含Excel中所有當(dāng)前打開的Excel工作簿,亦即所有打開的Excel文件;Workbook對應(yīng)Workbooks中的成員,即其中的Excel文件;ActiveWorkbook代表當(dāng)前處于活動狀態(tài)的工作簿,即當(dāng)前顯示的Excel文件;ThisWorkbook代表其中有Visual Basic代碼正在運(yùn)行的工作簿。
在具體使用中可用Workbooks(index)來引用Workbook對象,其中 index為工作簿名稱或編號;如Workbooks(1)、Workbooks("年度報(bào)表.xls")。而編號按照創(chuàng)建或打開工作簿的順序來確定,第一個(gè)打開的工作簿編號為1,第二個(gè)打開的工作簿為2……。
2、工作表:Worksheets、Worksheet、ActiveSheet
Worksheets集合包含工作簿中所有的工作表,即一個(gè)Excel文件中的所有數(shù)據(jù)表頁;而Worksheet則代表其中的一個(gè)工作表;ActiveSheet代表當(dāng)前處于的活動狀態(tài)工作表,即當(dāng)前顯示的一個(gè)工作表。
可用Worksheets(index)來引用Worksheet對象,其中index為工作表名稱或索引號;如Worksheets(1)、 Worksheets("第一季度數(shù)據(jù)")。工作表索引號表明該工作表在工作表標(biāo)簽中的位置:第一個(gè)(最左邊的)工作表的索引號為1,最后一個(gè)(最右邊的)為Worksheets.Count。需要注意的是:在使用過程中Excel會自動重排工作表索引號,保持按照其在工作表標(biāo)簽中的從左至右排列,工作表的索引號遞增。因此,由于可能進(jìn)行的工作表添加或刪除,工作表索引號不一定始終保持不變。 3、圖表:Chart 、Charts、ChartObject、ChartObjects、ActiveChart
Chart代表工作簿中的圖表。該圖表既可為嵌入式圖表(包含在ChartObject中),也可為一個(gè)分開的(單獨(dú)的)圖表工作表。
Charts代表指定工作簿或活動工作簿中所有圖表工作表的集合,但不包括嵌入式在工作表或?qū)υ捒蚓庉嫳碇械膱D表。使用Charts(index) 可引用單個(gè)Chart圖表,其中index是該圖表工作表的索引號或名稱;如Charts(1)、Charts("銷售圖表")。圖表工作表的索引號表示圖表工作表在工作簿的工作表標(biāo)簽欄上的位置。Charts(1)是工作簿中第一個(gè)(最左邊的)圖表工作表;Charts(Charts.Count)為最后一個(gè)(最右邊的)圖表工作表。
ChartObject代表工作表中的嵌入式圖表,其作用是作為Chart對象的容器。利用ChartObject可以控制工作表上嵌入式圖表的外觀和尺寸。
ChartObjects代表指定的圖表工作表、對話框編輯表或工作表上所有嵌入式圖表的集合。可由ChartObjects(index)引用單個(gè) ChartObject,其中index為嵌入式圖表的編號或名稱。如Worksheets("Sheet1").ChartObjects(1)、 Worksheets("sheet1").ChartObjects("chart1")分別對應(yīng)"Sheet1"工作表中的第一個(gè)嵌入式圖表、以及名為"Chart1"的嵌入式圖表。
ActiveChart可以引用活動狀態(tài)下的圖表,不論該圖表是圖表工作表,或嵌入式圖表。而對于圖表工作表為活動工作表時(shí),還可以通過ActiveSheet屬性引用之。
4、單元格:Cells、ActiveCell、Range、Areas
Cells(row,column)代表單個(gè)單元格,其中row為行號,column為列號。如可以用Cells(1,1)、Cells(10,4)來引用"A1"、"D10" 單元格。ActiveCell代表活動工作表的活動單元格,或指定工作表的活動單元格。
Range代表工作表中的某一單元格、某一行、某一列、某一選定區(qū)域(該選定區(qū)域可包含一個(gè)或若干連續(xù)單元格區(qū)域)或者某一三維區(qū)域。
可用Range(arg)來引用單元格或單元格區(qū)域,其中arg可為單元格號、單元格號范圍、單元格區(qū)域名稱。如Range("A5")、 Range("A1:H8")、Range("Criteria")。雖然可用Range("A1")返回單元格A1,但用Cells更方便,因?yàn)榇藭r(shí)可用變量指定行和列。
可將Range與Cells結(jié)合起來使用,如Range(Cells(1,1),Cells(10,10))代表單元格區(qū)域"A1:J10";而expression.Cells(row,column)返回單元格區(qū)域中的一部分,其中expression是返回Range的表達(dá)式,row和column為相對于該區(qū)域的左上角偏移量。如由Range("C5:C10").Cells(1,1)引用單元格C5。
Areas為選定區(qū)域內(nèi)的連續(xù)單元格塊的集合,其成員是Range對象。而其中的每個(gè)Range對象代表選定區(qū)域內(nèi)與其它部分相分離的一個(gè)連續(xù)單元格塊。某些操作不能在選定區(qū)域內(nèi)的多個(gè)單元格塊上同時(shí)執(zhí)行;必須在選定區(qū)域內(nèi)的單元格塊數(shù)Areas.Count上循環(huán),對每個(gè)單獨(dú)的單元格塊分別執(zhí)行該操作。此時(shí),可用Areas(index)從集合中返回單個(gè)Range對象,其中index為單元格塊編號;如Areas(1)。
5、 行與列:Rows、Columns、Row、Column
Rows、Columns分別代表活動工作表、單元格區(qū)域范圍Range、指定工作表中的所有行數(shù)、列數(shù)。對于一個(gè)多選單元格區(qū)域范圍Range的 Rows、Columns,只返回該范圍中第一個(gè)區(qū)域的行數(shù)、列數(shù)。例如,如果Range對象有兩個(gè)區(qū)域(areas)A1:B2和 C3:D4,Rows.Count返回2而不是4。
可通過Rows(行號)、Columns(列號)來引用相應(yīng)的行與列;如Rows(3)、Columns(4)分別對應(yīng)第三行、D列。
利用Rows、Column可以獲得區(qū)域中第一塊的第一行行號、第一列列號,所得值均以十進(jìn)制數(shù)表示。