使用VBA代码确定、激活、选择单元格区域

使用VBA代码选定、激活单元格区域的多种方法,包括示例

使用VBA代码确定、激活、选择单元格区域

　

如何选择当前工作表中的单元格？
例如，可以使用下面的代码选择当前工作表中的单元格D5：
ActiveSheet.Cells(5, 4).Select
或：ActiveSheet.Range(D5).Select

如何选择同一工作簿中其它工作表上的单元格？
例如，要选择同一工作簿中另一工作表上的单元格E6，可以使用下面的代码：
Application.Goto ActiveWorkbook.Sheets(Sheet2).Cells(6, 5)
或：Application.Goto (ActiveWorkbook.Sheets(Sheet2).Range(E6))
也可以先激活该工作表，然后再选择：
Sheets(Sheet2).Activate
ActiveSheet.Cells(6, 5).Select

如何选择不同工作簿中的单元格？
例如，要选择另一工作簿中的一个工作表上的单元格F7，可以使用下面的代码：
Application.Goto Workbooks(BOOK2.XLS).Sheets(Sheet1).Cells(7, 6)
或：Application.Goto Workbooks(BOOK2.XLS).Sheets(Sheet1).Range(F7)
也可以先激活该工作簿中的工作表，然后再选择：
Workbooks(BOOK2.XLS).Sheets(Sheet1).Activate
ActiveSheet.Cells(7, 6).Select

如何选择当前工作表中的单元格区域？
例如，要选择当前工作表中的单元格区域C2D10，可以使用下面的代码：
ActiveSheet.Range(Cells(2, 3), Cells(10, 4)).Select
或：ActiveSheet.Range(C2D10).Select
或：ActiveSheet.Range(C2, D10).Select

如何选择同一工作簿中另一工作表上的单元格区域？
例如，要选择同一工作簿中另一工作表上的单元格区域D3：E11，可以使用下面的代码：
Application.Goto ActiveWorkbook.Sheets(Sheet3).Range(D3E11)
或：Application.Goto ActiveWorkbook.Sheets(Sheet3).Range(D3, E11)
也可以先激活该工作表，然后再选择：
Sheets(Sheet3).Activate
ActiveSheet.Range(Cells(3, 4), Cells(11, 5)).Select

如何选择不同工作簿中工作表上的单元格区域？
例如，要选择另一工作簿中某工作表上的单元格区域E4F12，可以使用下面的代码：
Application.Goto Workbooks(BOOK2.XLS).Sheets(Sheet1).Range(E4F12)
或：Application.Goto Workbooks(BOOK2.XLS).Sheets(Sheet1).Range(E4, F12)
也可以先激活该工作表，然后再选择：
Workbooks(BOOK2.XLS).Sheets(Sheet1).Activate
ActiveSheet.Range(Cells(4, 5), Cells(12, 6)).Select

如何在当前工作表中选择命名区域？
例如，要选择当前工作表中名为“Test”的区域，可以使用下面的代码：
Range(Test).Select
或：Application.Goto Test

如何选择同一工作簿中另一工作表上的命名区域？
例如，选择同一工作簿中另一工作表上名为“Test”的区域，可使用下面的代码：
Application.Goto Sheets(Sheet1).Range(Test)
也可以先激活工作表，再选择：
Sheets(Sheet1).Activate
Range(Test).Select

如何选择不同工作簿中工作表上的命名区域？
例如，要选择不同工作簿中工作表上名为“Test”的区域，可使用下面的代码：
Application.Goto

第1页下一页