在excel中使用vba代码选择区域

《在excel中使用vba代码选择区域》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、在EXCEL中使用VBA代码选择区域目录1)如何选择当前工作表中的单元格？2)如何选择同一工作簿中其它工作表上的单元格？3)如何选择不同工作簿中的单元格？4)如何选择当前工作表中的单元格区域？5)如何选择同一工作簿中另一工作表上的单元格区域？6)如何选择不同工作簿中工作表上的单元格区域？7)如何在当前工作表中选择命名区域？8)如何选择同一工作簿中另一工作表上的命名区域？9)如何选择不同工作簿中工作表上的命名区域？10)如何选择与当前单元格相关的单元格？11)如何选择与另一单元格(不是当前单元格)相关的单元格？12)如何选择偏离指定区域的一个单元格区域？13)如何选择一

2、个指定的区域并扩展区域的大小？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---------------------------------------------------------------------

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

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

6、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.R

7、ange("C2","D10").Select--------------------------------------------------------------------------------5)如何选择同一工作簿中另一工作表上的单元格区域？例如，要选择同一工作簿中另一工作表上的单元格区域D3：E11，可以使用下面的代码：Application.GotoActiveWorkbook.Sheets("Sheet3").Range("D3:E11")或：Application.GotoActiveWorkbook.Sheets("Sheet