《在excel中使用vba代码选择区域》由会员分享，可在线阅读，更多相关《在excel中使用vba代码选择区域（30页珍藏版）》请在金锄头文库上搜索。
1、在在 EXCELEXCEL 中使用中使用 VBAVBA 代码选择区域代码选择区域目录1)如何选择当前工作表中的单元格？2)如何选择同一工作簿中其它工作表上的单元格？3)如何选择不同工作簿中的单元格？4)如何选择当前工作表中的单元格区域？5)如何选择同一工作簿中另一工作表上的单元格区域？6)如何选择不同工作簿中工作表上的单元格区域？7)如何在当前工作表中选择命名区域？8)如何选择同一工作簿中另一工作表上的命名区域？9)如何选择不同工作簿中工作表上的命名区域？10)如何选择与当前单元格相关的单元格？11)如何选择与另一单元格(不是当前单元格)相关的单元格？12)如何选择偏离指定区域的一个单元格区域
2、？13)如何选择一个指定的区域并扩展区域的大小？14)如何选择一个指定的区域，再偏离，然后扩展区域的大小？15)如何选择两个或多个指定区域？16)如何选择两个或多个指定区域的交叉区域？17)如何选择连续数据列中的最后一个单元格？18)如何选择连续数据列底部的空单元格？19)如何选择某列中连续数据单元格区域？20)如何选择某列中非连续数据单元格区域？21)如何选择一个矩形(规则的)单元格区域？22)如何选择多个不同长度的非连续列？23)引用工作表上的所有单元格24)使用 A1 表示法引用单元格和区域25)引用行和列26)使用索引号引用单元格27)使用快捷表示法引用单元格28)使用 Range 对
3、象引用单元格29)引用命名区域30)引用多个区域31)处理三维区域-1)如何选择当前工作表中的单元格？例如，可以使用下面的代码选择当前工作表中的单元格 D5：ActiveSheet.Cells(5, 4).Select或：ActiveSheet.Range(“D5“).Select-2)如何选择同一工作簿中其它工作表上的单元格？例如，要选择同一工作簿中另一工作表上的单元格 E6，可以使用下面的代码：Application.Goto ActiveWorkbook.Sheets(“Sheet2“).Cells(6, 5)或：Application.Goto (ActiveWorkbook.Shee
4、ts(“Sheet2“).Range(“E6“)也可以先激活该工作表，然后再选择：Sheets(“Sheet2“).ActivateActiveSheet.Cells(6, 5).Select-3)如何选择不同工作簿中的单元格？例如，要选择另一工作簿中的一个工作表上的单元格 F7，可以使用下面的代码：Application.Goto Workbooks(“BOOK2.XLS“).Sheets(“Sheet1“).Cells(7, 6)或：Application.Goto Workbooks(“BOOK2.XLS“).Sheets(“Sheet1“).Range(“F7“)也可以先激活该工作簿中
5、的工作表，然后再选择：Workbooks(“BOOK2.XLS“).Sheets(“Sheet1“).ActivateActiveSheet.Cells(7, 6).Select-4)如何选择当前工作表中的单元格区域？例如，要选择当前工作表中的单元格区域 C2:D10，可以使用下面的代码：ActiveSheet.Range(Cells(2, 3), Cells(10, 4).Select或：ActiveSheet.Range(“C2:D10“).Select或：ActiveSheet.Range(“C2“, “D10“).Select-5)如何选择同一工作簿中另一工作表上的单元格区域？例如，要
6、选择同一工作簿中另一工作表上的单元格区域 D3：E11，可以使用下面的代码：Application.Goto ActiveWorkbook.Sheets(“Sheet3“).Range(“D3:E11“)或：Application.Goto ActiveWorkbook.Sheets(“Sheet3“).Range(“D3“, “E11“)也可以先激活该工作表，然后再选择：Sheets(“Sheet3“).ActivateActiveSheet.Range(Cells(3, 4), Cells(11, 5).Select-6)如何选择不同工作簿中工作表上的单元格区域？例如，要选择另一工作簿中某
7、工作表上的单元格区域 E4:F12，可以使用下面的代码：Application.Goto Workbooks(“BOOK2.XLS“).Sheets(“Sheet1“).Range(“E4:F12“)或：Application.Goto Workbooks(“BOOK2.XLS“).Sheets(“Sheet1“).Range(“E4“, “F12“)也可以先激活该工作表，然后再选择：Workbooks(“BOOK2.XLS“).Sheets(“Sheet1“).ActivateActiveSheet.Range(Cells(4, 5), Cells(12, 6).Select-7)如何在当前
8、工作表中选择命名区域？例如，要选择当前工作表中名为“Test”的区域，可以使用下面的代码：Range(“Test“).Select或：Application.Goto “Test“-8)如何选择同一工作簿中另一工作表上的命名区域？例如，选择同一工作簿中另一工作表上名为“Test”的区域，可使用下面的代码：Application.Goto Sheets(“Sheet1“).Range(“Test“)也可以先激活工作表，再选择：Sheets(“Sheet1“).ActivateRange(“Test“).Select-9)如何选择不同工作簿中工作表上的命名区域？例如，要选择不同工作簿中工作表上名为
9、“Test”的区域，可使用下面的代码：Application.Goto Workbooks(“BOOK2.XLS“).Sheets(“Sheet2“).Range(“Test“)也可以先激活工作表，再选择：Workbooks(“BOOK2.XLS“).Sheets(“Sheet2“).ActivateRange(“Test“).Select-10)如何选择与当前单元格相关的单元格？例如，要选择距当前单元格下面 5 行左侧 4 列的单元格，可以使用下面的代码：ActiveCell.Offset(5, -4).Select要选择距当前单元格上方 2 行右侧 3 列的单元格，可以使用下面的代码：Ac
10、tiveCell.Offset(-2, 3).Select注意：一定要保证当前单元格与所选单元格之间的距离在工作表范围内，否则会出错。-11)如何选择与另一单元格(不是当前单元格)相关的单元格？例如，要选择距单元格 C7 下方 5 行右侧 4 列的单元格，可以使用下面的代码：ActiveSheet.Cells(7, 3).Offset(5, 4).Select或：ActiveSheet.Range(“C7“).Offset(5, 4).Select-12)如何选择偏离指定区域的一个单元格区域？例如，要选择与名为“Test”的区域大小相同但在该区域下方 4 行右侧 3 列的一个区域，可以使用下面
11、的代码：ActiveSheet.Range(“Test“).Offset(4, 3).Select如果该命名区域不在当前工作表中，可以先激活该工作表，然后再选择，如下面的代码：Sheets(“Sheet3“).ActivateActiveSheet.Range(“Test“).Offset(4, 3).Select-13)如何选择一个指定的区域并扩展区域的大小？例如，要选择当前工作表中名为“Database”区域，然后将该区域向下扩展 5 行，可以使用下面的代码：Range(“Database“).SelectSelection.Resize(Selection.Rows.Count + 5,
12、 Selection.Columns.Count).Select-14)如何选择一个指定的区域，再偏离，然后扩展区域的大小？例如，选择名为“Database”区域下方 4 行右侧 3 列的一个区域，然后扩展 2 行和 1 列，可以使用下面的代码：Range(“Database“).SelectSelection.Offset(4, 3).Resize(Selection.Rows.Count + 2, Selection.Columns.Count + 1).Select-15)如何选择两个或多个指定区域？例如，为了同时选择名为“Test”和“Sample”的两个区域，可以使用下面的代码：Application.Union(Range(“Test“), Range(“Sample“).Select注意，这两个区域须在同一工作表中，如下面的代码：Set y = Application.Union(Range(“Sheet1!A1:B2“), Range(“Sheet1!C3:D4“)但 Union 方法不能处理不同工作表中的区域，可下面的代码：Set y = Application.Union(Range
