Excel 單元格的引用方法

1-1 使用Cells屬性　　使用Cells屬性返回一個Range對象，如下面的代碼所示。　　00.00.#001 Sub Cell()　　00.#002 Dim icell As Integer　　00.#003 For icell = 1 To 100　　00.#004 Sheet2.Cells(icell, 1).Value = icell　　00.#005 Next　　00.#006 End Sub　　普通瀏覽復制代碼保存代碼打印代碼　　01.#001 Sub Cell()　　02.#002 Dim icell As Integer　　03.#003 For icell = 1 To 100　　04.#004 Sheet2.Cells(icell, 1).Value = icell　　05.#005 Next　　06.#006 End Sub#001 Sub Cell()　　#002 Dim icell As Integer　　#003 For icell = 1 To 100　　#004 Sheet2.Cells(icell, 1).Value = icell　　#005 Next　　#006 End Sub

代碼解析：　　Cell過程使用For…Next語句為工作表中的A1:A100單元格區(qū)域填入序號。　　Cells屬性指定單元格區(qū)域中的單元格，語法如下：　　Cells(RowIndex, ColumnIndex)　　參數(shù)RowIndex是可選的，表示引用區(qū)域中的行序號。　　參數(shù)ColumnIndex是可選的，表示引用區(qū)域中的列序號。　　如果缺省參數(shù)，Cells屬性返回引用對象的所有單元格。　　Cells屬性的參數(shù)可以使用變量，因此經(jīng)常應用于在單元格區(qū)域中循環(huán)。

1-2 使用快捷記號　　在VBA中可以將A1引用樣式或命名區(qū)域名稱使用方括號括起來，作為Range屬性的快捷方式，這樣就不必鍵入單詞“Range”或使用引號，如下面的代碼所示。　　00.00.#001 Sub Fastmark()　　00.#002 [A1：A5] = 2　　00.#003 [Fast] = 4　　00.#004 End Sub　　普通瀏覽復制代碼保存代碼打印代碼　　01.#001 Sub Fastmark()　　02.#002 [A1：A5] = 2　　03.#003 [Fast] = 4　　04.#004 End Sub#001 Sub Fastmark()　　#002 [A1：A5] = 2　　#003 [Fast] = 4　　#004 End Sub

代碼解析：　　Fastmark過程使用快捷記號為單元格區(qū)域賦值。　　第2行代碼使用快捷記號將活動工作表中的A1：A5單元格賦值為2。　　第3行代碼將工作簿中已命名為“Fast”的單元格區(qū)域賦值為4。　　注意 使用快捷記號引用單元格區(qū)域時只能使用固定字符串而不能使用變量。