vba技巧21引用工作表的方式

《vba技巧21引用工作表的方式》由会员上传分享，免费在线阅读，更多相关内容在应用文档-天天文库。

1、技巧1引用工作表的方式VBA中，在不同的工作表之间转换或者对不同工作表中的单元格区域进行操作时，需要指定引用的工作表，通常有下面几种方法：1-1使用工作表的名称工作表名称是指显示在工作表标签中的文本，工作表名称可以使用WorkSheets集合和Sheets集合两种引用方式，如下面的代码所示。#001SubShActivate()#002Worksheets("索引号").Activate#003'Sheets("索引号").Activate#004EndSub第3、4行代码都激活工作簿中名称为“索引号”的工作表，激活后“索引号”工

2、作表将成为活动工作表。WorkSheets集合包含所有的工作表，而Sheets集合不仅包含工作表集合WorkSheets，还包含图表集合Charts、宏表集合Excel4MacroSheets与MSExcel5.0对话框集合DialogSheets等。任何时刻工作簿中只有一个工作表是活动工作表。1-2使用工作表的索引号工作表索引号是指工作表在工作簿中的位置，Excel根据工作表在工作表标签中的位置以1开始从左向右进行编号。下面的代码选中并激活当前工作簿中第1个工作表：#001SubShIndex()#002Worksheets(1

3、).Select#003EndSub单个WorkSheet对象的Select方法与Activate方法的主要区别在于Select方法要求工作表可视。注意当工作簿包括工作表、宏表、图表等时，使用索引号引用工作表如Sheets(1)与WorkSheets(1)引用的可能不是同一个表。使用Worksheet对象的Index属性可以返回工作表的索引号，如下面的代码所示。#001SubShInde()#002MsgBoxWorksheets("索引号").Index#003EndSub1-1使用工作表的代码名称使用Worksheet对象的C

4、odeName属性可以返回工作表的代码名称，如下面的代码所示。#001SubShCodeName()#002MsgBoxSheets(1).CodeName#003EndSub工作表的代码名称显示在VBE工程资源管理器窗口中，在属性窗口中能够修改工作表代码名称，如图11所示。在VBA中能够直接使用工作表的代码名称引用工作表，即使工作表的名称被修改，代码仍然能够正常运行。图11工作表的代码名称1-2使用ActiveSheet属性引用活动工作表使用ActiveSheet属性可以返回活动工作表，如下面的代码所示。#001SubShA

5、ctive()#002MsgBoxActiveSheet.Name#003EndSubActiveSheet属性应用于AppActivate对象、Window对象和Workbook对象时，如果未给出对象识别符，返回活动工作簿中的活动工作表。