小結
下面對Range對象的一些常用屬性和方法進行簡單的小結。 1、Activate與Select 試驗下面的過程: Sub SelectAndActivate() Range("B3:E10").Select Range("C5").Activate End Sub 其結果如下圖所示: 500){this.resized=true;this.style.width=500;}" border=0 resized="true"> 圖05-01:Select與Activate Selection指單元格區(qū)域B3:E10,而ActiveCell則是單元格C5;ActiveCell代表單個的單元格,而Selection則可以代表單個單元格,也可以代表單元格區(qū)域。 2、Range屬性 可以使用Application對象的Range屬性引用Range對象,如 Application.Range(“B2”) ‘代表當前工作表中的單元格B2 若引用當前工作表中的單元格,也可以忽略前面的Application對象。 Range(“A1:D10”) ‘代表當前工作表中的單元格區(qū)域A1:D10 Range(“A1:A10,C1:C10,E1:E10”) ‘代表當前工作表中非連續(xù)的三個區(qū)域組成的單元格區(qū)域 Range屬性也接受指向單元格區(qū)域對角的兩個參數,如: Range(“A1”,”D10”) ‘代表單元格區(qū)域A1:D10 當然,Range屬性也接受單元格區(qū)域名稱,如: Range(“Data”) ‘代表名為Data的數據區(qū)域 Range屬性的參數可以是對象也可以是字符串,如: Range(“A1”,Range(“LastCell”)) 3、單元格引用的快捷方式 可以在引用區(qū)域兩側加上方括號來快速引用單元格區(qū)域,如: [B2] [A1:D10] [A1:A10,C1:C10,E1:E10] [Data] 但其引用的是絕對區(qū)域。 4、Cells屬性 可以使用Cells屬性來引用Range對象。如: ActiveSheet.Cells Application.Cells ‘引用當前工作表中的所有單元格 Cell(2,2) Cell(2,”B”) ‘引用單元格B2 Range(Cells(1,1),Cells(10,5)) ‘引用單元格區(qū)域A1:E10 若想在一個單元格區(qū)域中循環(huán)時,使用Cells屬性是很方便的。 也可以使用Cells屬性進行相對引用,如: Range(“D10:G20”).Cells(2,3) ‘表示引用單元格區(qū)域D10:G20中第2行第3列的單元格,即單元格F11 也可使用語句:Range(“D10”).Cells(2,3)達到同樣的引用效果。 5、Offset屬性 Offset屬性基于當前單元格按所給參數進行偏移,與Cells屬性不同的是,它基于0即基準單元格為0,如: Range(“A10”).Cells(1,1)和Range(“A10”).Offset(0,0)都表示單元格A10 當想引用于基準單元格區(qū)域同樣大小的單元格區(qū)域時,則Offset屬性是有用的。 6、Resize屬性 可使用Resize屬性獲取相對于原單元格區(qū)域左上角單元格指定大小的區(qū)域。 7、SpecialCells方法 SpecialCells方法對應于“定位條件”對話框,如圖05-02所示: 500){this.resized=true;this.style.width=500;}" border=0> MsgBox Rng.Address Next Rng 12、Union方法和Intersect方法 當想從兩個或多個單元格區(qū)域中生成一個單元格區(qū)域時,使用Union方法;當找到兩個或多個單元格區(qū)域共同擁有的單元格區(qū)域時,使用Intersect方法。 操作單元格或單元格區(qū)域有很多有用的技巧,這需要在實踐中總結和歸納。有關單元格區(qū)域的操作也可參見《在VBA代碼中引用Excel工作表中單元格區(qū)域的方式小結》和《使用VBA代碼選擇單元格/區(qū)域》。 |
|
來自: COPY&PASTE > 《excel vba》