用 VBA 代码操作工作表对象

听过VBA代码吗?羡慕能用代码高效办公的人吧!VBA代码远没有大家想象的那么难,跟着小编学一起学吧!
一个Worksheet对象代表一张普通的工作表,Worksheets是指定工作簿中所有Worksheet组成的集合。下面教大家三种引用工作表的三种方法。

1、通过索引号

同工作簿一样,工作簿中的每张工作表都拥有索引号,如图 3 -21 所示。

图 3-21 工作表的索引号和标签名称

如果要引用活动工作簿中的第 3 张工作表,可以将代码写为:

Worksheets.Item(3) ' 引用活动工作簿中的第 3 张工作表

通常我们会省略Item属性的名称,将代码写为:

Worksheets(3) ' 引用活动工作簿中的第 3 张工作表


2、通过标签名称

在同一工作簿中,工作表的标签名称一定是唯一的,所以,也可以通过标签名称来引用工作表。如想引用活动工作簿中标签名称为“ExcelHome”的工作表,可以将代码写为:
Worksheets.Item('ExcelHome') ' 引用活动工作簿中标签名称为 'ExcelHome' 的工作表
但通常我们会将代码写成:
Worksheets('ExcelHome') ' 引用活动工作簿中标签名称为 'ExcelHome' 的工作表

3、通过代码名称

工作表的代码名称可以在VBE的【工程窗口】或【属性窗口】中看到,如图 3 - 22 所示。

图 3-22 工作表的代码名称和标签名称

使用代码名称引用工作表,只需直接写代码名称即可,如:
Sheet3.Range('A1').Value=100 ' 在代码名称为 Sheet3 的工作表的 A1 单元格输入 100
注意,这里的“Sheet3”是工作表的代码名称,而不是标签名称。

如果想通过VBA代码获得某张工作表的代码名称,可以访问它的CodeName属性,如:

MsgBox ActiveSheet.CodeName ' 用对话框显示活动工作表的代码名

称执行这行代码的效果如图 3 - 23 所示。

图 3-23 获得工作表的代码名称

工作表的代码名称,不会随工作表标签名称或索引号的改变而改变,并且代码名称只能在【属性窗口】中修改,因此,当工作表的标签名称或索引号不能固定时,通过代码名称引用工作表是更合适的选择。
学会了吗?快速提高你的效率吧!从此变“excel一秒超人”!
(0)

相关推荐