資源描述：
《vba常用代碼解析》由會員上傳分享，免費在線閱讀，更多相關內(nèi)容在應用文檔-天天文庫。
1、EXCELVBA常用代碼解析Range對象是Excel應用程序中最常用的對象，一個Range對象代表一個單元格、一行、一列、包含一個或者更多單元格區(qū)域(可以是連續(xù)的單元格，也可以是不連續(xù)的單元格)中選定的單元格，甚至是多個工作表上的一組單元格，在操作Excel內(nèi)的任何區(qū)域之前都需要將其表示為一個Range對象，然后使用該Range對象的方法和屬性。▲001單元格的引用方法在VBA中經(jīng)常需要引用單元格或單元格區(qū)域區(qū)域，主要有以下幾種方法。001-1使用Range屬性VBA中可以使用Range屬性返回單元格或單元格區(qū)域，如下面的代碼所
2、示。SubRngSelect()Sheet1.Range("A3:F6，B1:C5").SelectEndSub代碼解析：RangeSelect過程使用Select方法選中A3:F6，B1:C5單元格區(qū)域。Range屬性返回一個Range對象，該對象代表一個單元格或單元格區(qū)域，語法如下：Range(Cell1，Cell2)參數(shù)Cell1是必需的，必須為A1樣式引用的宏語言，可包括區(qū)域操作符(冒號)、相交區(qū)域操作符(空格)或合并區(qū)域操作符(逗號)。也可包括美元符號(即絕對地址，如“$A$1”)。可在區(qū)域中任一部分使用局部定義名稱，如
3、Range("B2:LastCell")，其中LastCell為已定義的單元格區(qū)域名稱。參數(shù)Cell2是可選的，區(qū)域左上角和右下角的單元格。運行RangeSelect過程，選中A3:F6，B1:C5單元格區(qū)域。001-2使用Cells屬性使用Cells屬性返回一個Range對象，如下面的代碼所示。SubCell()DimicellAsIntegerForicell=1To100Sheet2.Cells(icell，1).Value=icellNextEndSub代碼解析：Cell過程使用For...Next語句為工作表中的A1:A
4、100單元格區(qū)域填入序號。Cells屬性指定單元格區(qū)域中的單元格，語法如下：Cells(RowIndex，ColumnIndex)參數(shù)RowIndex是可選的，表示引用區(qū)域中的行序號。參數(shù)ColumnIndex是可選的，表示引用區(qū)域中的列序號。如果缺省參數(shù)，Cells屬性返回引用對象的所有單元格。Cells屬性的參數(shù)可以使用變量，因此經(jīng)常應用于在單元格區(qū)域中循環(huán)。001-3使用快捷記號在VBA中可以將A1引用樣式或命名區(qū)域名稱使用方括號括起來，作為Range屬性的快捷方式，這樣就不必鍵入單詞“Range”或使用引號，如下面的代碼所
5、示。SubFastmark()[A1：A5]=2[Fast]=4EndSub代碼解析：Fastmark過程使用快捷記號為單元格區(qū)域賦值。第2行代碼使用快捷記號將活動工作表中的A1：A5單元格賦值為2。第3行代碼將工作簿中已命名為“Fast”的單元格區(qū)域賦值為4。注意使用快捷記號引用單元格區(qū)域時只能使用固定字符串而不能使用變量。001-4使用Offset屬性可以使用Range對象的Offset屬性返回一個基于引用的Range對象的單元格區(qū)域，如下面的代碼所示。SubOffset()Sheet3.Range("A1:C3").Offs
6、et(3，3).SelectEndSub代碼解析：Offset過程使用Range對象的Offset屬性選中A1：A3單元格偏移三行三列后的區(qū)域。應用于Range對象的Offset屬性的語法如下：expression.Offset(RowOffset，ColumnOffset)參數(shù)expression是必需的，該表達式返回一個Range對象。參數(shù)RowOffset是可選的，區(qū)域偏移的行數(shù)(正值、負值或0(零))。正值表示向下偏移，負值表示向上偏移，默認值為0。參數(shù)ColumnOffset是可選的，區(qū)域偏移的列數(shù)(正值、負值或0(零)
7、)。正值表示向右偏移，負值表示向左偏移，默認值為0。運行Offset過程，選中A1：A3單元格偏稱三行三列后的區(qū)域。001-5使用Resize屬性使用Range對象的Resize屬性調(diào)整指定區(qū)域的大小，并返回調(diào)整大小后的單元格區(qū)域，如下面的代碼所示。SubResize()Sheet4.Range("A1").Resize(3，3).SelectEndSub代碼解析：Resize過程使用Range對象的Resize屬性選中A1單元格擴展為三行三列后的區(qū)域。Resize屬性的語法如下：expression.Resize(RowSize
8、，ColumnSize)參數(shù)expression是必需的，返回要調(diào)整大小的Range對象參數(shù)RowSize是可選的，新區(qū)域中的行數(shù)。如果省略該參數(shù)，則該區(qū)域中的行數(shù)保持不變。參數(shù)ColumnSize是可選的，新區(qū)域中的列數(shù)。如果省略該參數(shù)。則該區(qū)域
