excel学习库-VBA代码中如何引用工作表

今日继续讲解VBA代码解决方案，今日讲解的内容是如何引用工作表。VBA中，在不同的工作表之间转换或者对不同工作表中的单元格区域进行操作时，需要指定引用的工作表，在引用工作表时，通常有下面几种方法：一：使用工作表的名称工作表名称是指显示在工作表标签中的文本，工作表名称可以使用WorkSheets集合和Sheets集合两种引用方式，如下面的代码所示。 Sub MyShActivate() Worksheets("KKK").Activate Sheets("KKK").Activate End Sub 备注：a) 第2、3行代码都激活工作簿中名称为“KKK”的工作表，激活后“KKK”工作表将成为活动工作表。 b) WorkSheets集合包含所有的工作表，而Sheets集合不仅包含工作表集合WorkSheets，还包含图表集合、宏表集合与对话框集合等。任何时刻工作簿中只有一个工作表是活动工作表。二：使用工作表的索引号工作表索引号是指工作表在工作簿中的位置，Excel根据工作表在工作表标签中的位置以1开始从左向右进行编号。下面的代码选中并激活当前工作簿中第1个工作表： Sub MyShIndex() Worksheets(1).Select End Sub 备注：a) 单个WorkSheet对象的Select方法与Activate方法的主要区别在于Select方法要求工作表可视。 b) 当工作簿包括工作表、宏表、图表等时，使用索引号引用工作表如Sheets(1)与WorkSheets(1)引用的可能不是同一个表。 c) 使用Worksheet对象的Index属性可以返回工作表的索引号，如下面的代码所示。 Sub MyShInde() MsgBox Worksheets("AAA").Index End Sub 三：使用工作表的代码名称使用Worksheet对象的CodeName属性可以返回工作表的代码名称，如下面的代码所示。 Sub MyShCodeName() MsgBox Sheets(1).CodeName End Sub 备注：a) 工作表的代码名称显示在VBE工程资源管理器窗口中，在属性窗口中能够修改工作表代码名称。 b) 在VBA中能够直接使用工作表的代码名称引用工作表，即使工作表的名称被修改，代码仍然能够正常运行。四：使用ActiveSheet属性可以返回活动工作表，如下面的代码所示。 Sub MyShActive() MsgBox ActiveSheet.Name End Sub 备注：a)ActiveSheet属性应用于AppActivate对象、Window对象和Workbook对象时，如果未给出对象识别符，返回活动工作簿中的活动工作表。下面看本节的代码实测结果：代码窗口如下

EXCEL窗口：

运行MyShActive：

今日内容回向： 1 使用工作表的名称、工作表的索引号、工作表的代码名称有什么不同？ 2 如何得到活动单元工作表的名称？ 3 Select方法与Activate方法有什么不同？

一	二	三	四	五	六	日
						1
2	3	4	5	6	7	8
9	10	11	12	13	14	15
16	17	18	19	20	21	22
23	24	25	26	27	28	29
30	31

excel学习库

excel表格_excel函数公式大全_execl从入门到精通

VBA代码中如何引用工作表2024-03-23 04:46:38