本章是本系列教程的重點(diǎn)。但我覺得應(yīng)該不是難點(diǎn)。從第零章開始到學(xué)完本章，應(yīng)該可以把VBA用于實(shí)戰(zhàn)中了。
Excel對象主要有4個(gè)：
這里我只講后面3個(gè)，不講工作薄。原因有2點(diǎn)：
第零章里面講過，工作薄其實(shí)就是一個(gè)Excel文件。我不建議直接操作Excel文件。因?yàn)槲募傩员桓牡臋C(jī)率高。比如修改了文件名，或者文件被移動到其它地方去了，這樣的話，寫死的VBA代碼就不管用了。這是主要原因
學(xué)完本章，或者后面的章節(jié)，應(yīng)該可以自己尋找到如何操作Excel工作薄的方法
在多數(shù)情況下，如果需要操作多個(gè)工作薄中的數(shù)據(jù)，建議把這些工作薄里面的表復(fù)制到一個(gè)工作薄中進(jìn)行操作。這樣會方便很多。
其實(shí)對工作表的操作，更多是對其引用。當(dāng)一個(gè)工作薄中有多個(gè)工作表而需要用到不同表中的數(shù)據(jù)時(shí)，就需要分別引用不同的工作表。
引用工作表，有兩種方式：通過表名引用、通過表順序引用
顧名思義，表名引用即通過工作表的名字來引用相應(yīng)的工作表。除了可以直接在Excel中看到工作表的名字外，也可以在VBE中左側(cè)的工程視圖里看到當(dāng)前工作薄中包含有哪些工作表。
如上圖紅框所示，括號里面的即為表名。在VBA中可如下分別引用這3個(gè)表：
如上，用Dim 變量名 As Worksheet的格式來定義一個(gè)工作表對象。用Set 變量名 ＝ Worksheets('表名')的格式來把工作表對象賦值給指定的變量。然后就可以用這個(gè)變量來引用或操作對應(yīng)工作表中的對象和數(shù)據(jù)了。
順序引用，即按工作表出現(xiàn)在工作薄中的順序從左到右，依次用1、2、3.……來引用。格式和以表名引用一樣：
這里要提出的是，在VBE工程窗口中看到的自上而下的表順序并不是在VBA中引用的順序。這個(gè)順序是以工作表在工作薄中從左到右的順序?yàn)闇?zhǔn)。因此上例代碼是基于如下順序的：
這也意味著，如果被人為地有意或無意地拖動這些表而改變了它們的順序，那么以這種方式引用工作表將得不到預(yù)想中的結(jié)果
單元格區(qū)域，即Range對象。應(yīng)該是在Excel VBA中用得最多的對象。Range對象是Worksheet對象的一個(gè)子集。所以通常通過worksheet_object.Range()的方式來引用。
單元格區(qū)域，可以是單個(gè)單元格，也可以是多個(gè)連續(xù)的單元格和多個(gè)不連續(xù)的單元格。在使用單元格區(qū)域?qū)ο笄?，?yīng)該先進(jìn)行變量定義。把變量定義為Range對象即可：
本節(jié)使用下圖數(shù)據(jù)為例進(jìn)行代碼演示：
在Excel中，每個(gè)單元格都是有其相應(yīng)的地址的，或者叫做“名字”也可以。最常用到的，就是平時(shí)說的A1、B4、D10等。在VBA中，可以通過單元格的地址來引用單個(gè)單元格。
輸出：92257598
即D2單元格中的數(shù)據(jù)。這里可能會引起誤會，特說明一下。僅在Range對象引用的是單個(gè)單元格時(shí)，才可以用Debug.Print或者MsgBox來輸出Range對象中的內(nèi)容。如果將接下來介紹的引用了多個(gè)單元格的Range對象使用Debug.Print或者MsgBox來輸出，將會報(bào)錯(cuò)。
這種引用則類似于用鼠標(biāo)在工作表中選中特定區(qū)域（然后我們可以給這個(gè)區(qū)域加上邊框，或者加上底色等操作），或者是在Excel函數(shù)中引用某個(gè)區(qū)域。如選中A1到D4，或者對D2到D4中的數(shù)值進(jìn)行求和－SUM(D2:D4)。在VBA中也可以這樣來引用。
如上代碼中，先引用SLEA表，然后把這個(gè)表中A1到D4區(qū)賦值給rng對象。最后一行把這個(gè)區(qū)域標(biāo)上灰底色。結(jié)果如下：
對于這樣多行多列的單元格區(qū)域，通常只是用于設(shè)置其格式，很少會直接對其中每個(gè)單元格的數(shù)據(jù)進(jìn)行操作的。更多的是對單行或單列中的數(shù)據(jù)進(jìn)行操作。比如把上例中D1到D5的數(shù)據(jù)依次輸出：
執(zhí)行結(jié)果如下：
這種引用方式應(yīng)該應(yīng)用場景不多，我本人目前為止還沒有在工作中使用過。
它的引用只需要在Range()函數(shù)中的參數(shù)里，在雙引號中輸入多個(gè)區(qū)域地址中間用逗號隔開即可。如以下代碼可將B2到B5，D2到D5區(qū)域標(biāo)上紅色。
結(jié)果如下：
單元格，即Cell。不過在VBA里面，這個(gè)Cell得加上個(gè)s，即Cells，然后在連帶著的括號里面輸入用數(shù)字表示的行號和列號，即可引用到單個(gè)單元格對象。Cells對象也是Worksheet對象的一個(gè)子集。通常通過worksheet_object.Cells()的方式來引用。
輸出B1單元格（第1行，第2列）的內(nèi)容：Subsector
所以Cells()的第1個(gè)參數(shù)是行號，第2個(gè)參數(shù)是列號。都用數(shù)字表示。在上例中，使用Cells和使用Range好像沒什么區(qū)別，但是在進(jìn)行數(shù)據(jù)處理時(shí)，我們經(jīng)常需要?jiǎng)討B(tài)地把數(shù)據(jù)讀或?qū)懭胍粋€(gè)單元格中，這時(shí)候，用數(shù)字表示位置的Cells對象，再結(jié)合For循環(huán)，操作起來就很方便了。
如以下代碼可以把A1到D5中所有單元格的內(nèi)容分別輸出：
簡單來說，Range對象便于把單元格區(qū)域作為一個(gè)整體來引用或操作，而Cells對象則方便于對每一個(gè)單元格分別進(jìn)行操作。
先看清楚，上面兩種格式
前者是分別引用B2:B4和D2:D4這兩個(gè)區(qū)域，而后者則表示引用的是從B2:B4開始到D2:D4結(jié)束為止的這一整個(gè)連續(xù)的區(qū)域。所以后者其實(shí)是等價(jià)于Range('B2:D4')。
所以雖然使用后者的方式來使用Range也不會報(bào)錯(cuò)，但其實(shí)通常并不會這么使用
因?yàn)镃ells對象接受數(shù)字來表示行和列，而在Excel中，如果有兩個(gè)行列對，就可以表示一個(gè)單元格區(qū)域了。例如Range('B2:D4')也可以用Range(Cells(2, 2), Cells(4, 4))來表示。這種方式有時(shí)候很有用，如需要根據(jù)條件來判斷區(qū)域的開始和結(jié)束位置時(shí)，它就派上用場了。
其實(shí)前面提到過的Worksheet對象，它是有父對象的。其父對象為Workbook對象，而Workbook對象的父對象是頂級對象Application。Range的父對象是Worksheet對象，Cells對象的父對象也是Worksheet對象。所以在給這些對象賦值時(shí)，標(biāo)準(zhǔn)的寫法應(yīng)當(dāng)要把父對象給寫上，如：
但是如果VBA中的代碼涉及到的對象都位于一個(gè)工作表中，而這個(gè)工作表當(dāng)前是激活狀態(tài)，則這些父對象是可以省略的。默認(rèn)就是當(dāng)前（激活的）工作表。所以當(dāng)SLEA工作表激活時(shí)，上述代碼和下面的是等價(jià)的：
我個(gè)人建議（或者說是我個(gè)人習(xí)慣）在引用Range對象時(shí)，Worksheet對象不要省略
在單獨(dú)引用Cells對象時(shí)，Worksheet對象也不要省略
具體哪里省略哪里不省略，就得看個(gè)人習(xí)慣和應(yīng)用場景了。并沒有什么固定的規(guī)律可循。
本系列教程其它文章
Excel VBA 入門（零）
Excel VBA 入門（一）數(shù)據(jù)類型
Excel VBA 入門（二）數(shù)組和字典
Excel VBA 入門（三） 流程控制1－條件選擇
Excel VBA 入門（四）流程控制2－循環(huán)控制
Excel VBA 入門（五）Excel對象操作
Excel VBA 入門（六）過程和函數(shù)
Excel VBA 入門（七）注釋、宏按鈕及錯(cuò)誤處理
Excel VBA 入門（八）單元格邊框
Excel VBA 入門（九）操作工作薄
Excel VBA 入門（十）用戶窗體開發(fā)
聯(lián)系客服
