资源描述:
《EXCEL VBA基础--单元格的操作.doc》由会员上传分享,免费在线阅读,更多相关内容在行业资料-天天文库。
1、lVBA单元格操作l列举l1.如何选择当前工作表中的单元格?例如,可以使用下面的代码选择当前工作表中的单元格D5:ActiveSheet.Cells(5,4).Select或:ActiveSheet.Range("D5").Select2.如何选择同一工作簿中其它工作表上的单元格?例如,要选择同一工作簿中另一工作表上的单元格E6,可以使用下面的代码:Application.GotoActiveWorkbook.Sheets("Sheet2").Cells(6,5)或:Application.Goto(ActiveW
2、orkbook.Sheets("Sheet2").Range("E6"))也可以先激活该工作表,然后再选择:Sheets("Sheet2").ActivateActiveSheet.Cells(6,5).Select3.如何选择不同工作簿中的单元格?例如,要选择另一工作簿中的一个工作表上的单元格F7,可以使用下面的代码:Application.GotoWorkbooks("BOOK2.XLS").Sheets("Sheet1").Cells(7,6)或:Application.GotoWorkbooks("BOOK
3、2.XLS").Sheets("Sheet1").Range("F7")也可以先激活该工作簿中的工作表,然后再选择:Workbooks("BOOK2.XLS").Sheets("Sheet1").ActivateActiveSheet.Cells(7,6).Select4.如何选择当前工作表中的单元格区域?例如,要选择当前工作表中的单元格区域C2:D10,可以使用下面的代码:ActiveSheet.Range(Cells(2,3),Cells(10,4)).Select或:ActiveSheet.Range("C2
4、:D10").Select或:ActiveSheet.Range("C2","D10").Select5.如何选择同一工作簿中另一工作表上的单元格区域?例如,要选择同一工作簿中另一工作表上的单元格区域D3:E11,可以使用下面的代码:Application.GotoActiveWorkbook.Sheets("Sheet3").Range("D3:E11")或:Application.GotoActiveWorkbook.Sheets("Sheet3").Range("D3","E11")也可以先激活该工作表,然后
5、再选择:Sheets("Sheet3").ActivateActiveSheet.Range(Cells(3,4),Cells(11,5)).Select6.如何选择不同工作簿中工作表上的单元格区域?例如,要选择另一工作簿中某工作表上的单元格区域E4:F12,可以使用下面的代码:Application.GotoWorkbooks("BOOK2.XLS").Sheets("Sheet1").Range("E4:F12")或:Application.GotoWorkbooks("BOOK2.XLS").Sheets("
6、Sheet1").Range("E4","F12")也可以先激活该工作表,然后再选择:Workbooks("BOOK2.XLS").Sheets("Sheet1").ActivateActiveSheet.Range(Cells(4,5),Cells(12,6)).Select7.如何在当前工作表中选择命名区域?例如,要选择当前工作表中名为“Test”的区域,可以使用下面的代码:Range("Test").Select或:Application.Goto"Test"8.如何选择同一工作簿中另一工作表上的命名区域?例
7、如,选择同一工作簿中另一工作表上名为“Test”的区域,可使用下面的代码:Application.GotoSheets("Sheet1").Range("Test")也可以先激活工作表,再选择:Sheets("Sheet1").ActivateRange("Test").Select9.如何选择不同工作簿中工作表上的命名区域?例如,要选择不同工作簿中工作表上名为“Test”的区域,可使用下面的代码:Application.GotoWorkbooks("BOOK2.XLS").Sheets("Sheet2").Ran
8、ge("Test")也可以先激活工作表,再选择:Workbooks("BOOK2.XLS").Sheets("Sheet2").ActivateRange("Test").Select10.如何选择与当前单元格相关的单元格?例如,要选择距当前单元格下面5行左侧4列的单元格,可以使用下面的代码:ActiveCell.Offset(5,-4).Select要选择