在VBA代碼中引用Excel工作表中單元格區(qū)域的方式小結(jié)問(wèn)題一：在VBA代碼中，如何引用當(dāng)前工作表中的單個(gè)單元格(例如引用單元格C3)？
回答：可以使用下面列舉的任一方式對(duì)當(dāng)前工作表中的單元格(C3)進(jìn)行引用。
(1) Range("C3")
(2) [C3]
(3) Cells(3, 3)
(4) Cells(3, "C")
(5) Range("C4").Offset(-1)
Range("D3").Offset(, -1)
Range("A1").Offset(2, 2)
(6) 若C3為當(dāng)前單元格，則可使用：ActiveCell
(7) 若將C3單元格命名為“Range1”，則可使用：Range("Range1")或[Range1]
(8) Cells(4, 3).Offset(-1)
(9) Range("A1").Range("C3")
問(wèn)題二：在VBA代碼中，我要引用當(dāng)前工作表中的B2:D6單元格區(qū)域，有哪些方式？
回答：可以使用下面列舉的任一方式對(duì)當(dāng)前工作表中單元格區(qū)域B2:D6進(jìn)行引用。
(1) Range(“B2:D6”)
(2) Range("B2", "D6")
(3) [B2:D6]
(4) Range(Range("B2"), Range("D6"))
(5) Range(Cells(2, 2), Cells(6, 4))
(6) 若將B2:D6區(qū)域命名為“MyRange”，則又可以使用下面的語(yǔ)句引用該區(qū)域：
① Range("MyRange")
② [MyRange]
(7) Range("B2").Resize(5, 3)
(8) Range("A1:C5").Offset(1, 1)
(9) 若單元格B2為當(dāng)前單元格，則可使用語(yǔ)句：Range(ActiveCell, ActiveCell.Offset(4, 2))
(10) 若單元格D6為當(dāng)前單元格，則可使用語(yǔ)句：Range("B2", ActiveCell)
問(wèn)題三：在VBA代碼中，如何使用變量實(shí)現(xiàn)對(duì)當(dāng)前工作表中不確定單元格區(qū)域的引用？
回答：有時(shí)，我們需要在代碼中依次獲取工作表中特定區(qū)域內(nèi)的單元格，這通?？梢圆扇∠旅娴膸追N方式：
(1) Range(“A” & i)
(2) Range(“A” & i & “:C” & i)
(3) Cells(i,1)
(4) Cells(i,j)
其中，i、j為變量，在循環(huán)語(yǔ)句中指定i和j的范圍后，依次獲取相應(yīng)單元格。
問(wèn)題四：在VBA代碼中，如何擴(kuò)展引用當(dāng)前工作表中的單元格區(qū)域？
回答：可以使用Resize屬性，例如：
(1) ActiveCell.Resize(4, 4)，表示自當(dāng)前單元格開(kāi)始創(chuàng)建一個(gè)4行4列的區(qū)域。
(2) Range("B2").Resize(2, 2)，表示創(chuàng)建B2:C3單元格區(qū)域。
(3) Range("B2").Resize(2)，表示創(chuàng)建B2:B3單元格區(qū)域。
(4) Range("B2").Resize(, 2)，表示創(chuàng)建B2:C2單元格區(qū)域。
如果是在一個(gè)單元格區(qū)域(如B3:E6)，或一個(gè)命名區(qū)域中(如將單元格區(qū)域B3:E6命名為“MyRange”)使用Resize屬性，則只是相對(duì)于單元格區(qū)域左上角單元格擴(kuò)展區(qū)域，例如：
代碼Range("C3:E6").Resize(, 2)，表示單元格區(qū)域C3：D6，并且擴(kuò)展的單元格區(qū)域可不在原單元格區(qū)域內(nèi)。
因此，可以知道Resize屬性是相對(duì)于當(dāng)前活動(dòng)單元格或某單元格區(qū)域中左上角單元格按指定的行數(shù)或列數(shù)擴(kuò)展單元格區(qū)域。
問(wèn)題五：在VBA代碼中，如何在當(dāng)前工作表中基于當(dāng)前單元格區(qū)域或指定單元格區(qū)域處理其它單元格區(qū)域？
回答：可以使用Offset屬性，例如：
(1) Range("A1").Offset(2, 2)，表示單元格C3。
(2) ActiveCell.Offset(, 1)，表示當(dāng)前單元格下一列的單元格。
(3) ActiveCell.Offset(1)，表示當(dāng)前單元格下一行的單元格。
(4) Range("C3:D5").Offset(, 1)，表示單元格區(qū)域D3:E5，即將整個(gè)區(qū)域偏移一列。
從上面的代碼示例可知，Offset屬性從所指定的單元格開(kāi)始按指定的行數(shù)和列數(shù)偏移，從而到達(dá)目的單元格，但偏移的行數(shù)和列數(shù)不包括指定單元格本身。
問(wèn)題六：在VBA代碼中，如何在當(dāng)前工作表中引用交叉區(qū)域？
回答：可以使用Intersect方法，例如：
Intersect(Range("C3:E6"), Range("D5:F8"))，表示單元格區(qū)域D5:E6，即單元格區(qū)域C3:E6與D5:F8相重迭的區(qū)域。
問(wèn)題七：在VBA代碼中，如何在當(dāng)前工作表中引用多個(gè)區(qū)域？
回答：
(1) 可以使用Union方法，例如：
Union(Range("C3:D4"), Range("E5:F6"))，表示單元格區(qū)域C3:D4和E5:F6所組成的區(qū)域。
Union方法可以將多個(gè)非連續(xù)區(qū)域連接起來(lái)成為一個(gè)區(qū)域，從而可以實(shí)現(xiàn)對(duì)多個(gè)非連續(xù)區(qū)域一起進(jìn)行操作。
(2) 也可以使用下面的代碼：
Range("C3:D4, E5:F6")或[C3:D4, E5:F6]
注意：Range("C3:D4",
"F5:G6")，表示單元格區(qū)域C3:G6，即將兩個(gè)區(qū)域以第一個(gè)區(qū)域左上角單元格為起點(diǎn)，以第二個(gè)區(qū)域右下角單元格為終點(diǎn)連接成一個(gè)新區(qū)域。
同時(shí)，在引用區(qū)域后使用Rows屬性和Columns屬性時(shí)，注意下面代碼的區(qū)別：
①Range("C3:D4", "F8:G10").Rows.Count，返回的值為8；
②Range("C3:D4,F8:G10").Rows.Count，返回的值為2，即只計(jì)算第一個(gè)單元格區(qū)域。
問(wèn)題八：在VBA代碼中，如何引用當(dāng)前工作表中活動(dòng)單元格或指定單元格所在的區(qū)域(當(dāng)前區(qū)域)？
回答：可以使用CurrentRegion屬性，例如：
(1) ActiveCell.CurrentRegion，表示活動(dòng)單元格所在的當(dāng)前區(qū)域。
(2) Range("D5").CurrentRegion，表示單元格D5所在的當(dāng)前區(qū)域。
當(dāng)前區(qū)域是指周?chē)煽招谢蚩樟兴鶉傻膮^(qū)域。該屬性的詳細(xì)使用參見(jiàn)《CurrentRegion屬性示例》一文。
問(wèn)題九：在VBA代碼中，如何引用當(dāng)前工作表中已使用的區(qū)域？
回答：可以使用UsedRange屬性，例如：
(1) Activesheet.UsedRange，表示當(dāng)前工作表中已使用的區(qū)域。
(2) Worksheets("sheet1").UsedRange，表示工作表sheet1中已使用的區(qū)域。
與CurrentRegion屬性不同的是，該屬性代表工作表中已使用的單元格區(qū)域，包括顯示為空行，但已進(jìn)行過(guò)格式的單元格區(qū)域。該屬性的詳細(xì)使用參見(jiàn)《解析UsedRange屬性》一文。