VBA单元格操作

VBA单元格操作

列举

1.如何选择当前工作表中的单元格？

例如，可以使用下面的代码选择当前工作表中的单元格D5：

ActiveSheet.Cells(5, 4).Select

或：ActiveSheet.Range("D5").Select

2.如何选择同一工作簿中其它工作表上的单元格？

例如，要选择同一工作簿中另一工作表上的单元格E6，可以使用下面的代码： Application.Goto ActiveWorkbook.Sheets("Sheet2").Cells(6, 5)

或：Application.Goto (ActiveWorkbook.Sheets("Sheet2").Range("E6")) 也可以先激活该工作表，然后再选择：

Sheets("Sheet2").Activate

ActiveSheet.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") 也可以先激活该工作簿中的工作表，然后再选择：

Workbooks("BOOK2.XLS").Sheets("Sheet1").Activate

ActiveSheet.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.如何选择同一工作簿中另一工作表上的单元格区域？

例如，要选择同一工作簿中另一工作表上的单元格区域D3：E11，可以使用下面的代码：

Application.Goto ActiveWorkbook.Sheets("Sheet3").Range("D3:E11")

或：Application.Goto ActiveWorkbook.Sheets("Sheet3").Range("D3", "E11")

也可以先激活该工作表，然后再选择：

Sheets("Sheet3").Activate

ActiveSheet.Range(Cells(3, 4), Cells(11, 5)).Select

6.如何选择不同工作簿中工作表上的单元格区域？

例如，要选择另一工作簿中某工作表上的单元格区域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").Activate

ActiveSheet.Range(Cells(4, 5), Cells(12, 6)).Select

7.如何在当前工作表中选择命名区域？

例如，要选择当前工作表中名为“Test”的区域，可以使用下面的代码：

第1页下一页