第章Worksheet(工作表)对象PPT.pptVIP

第3课Worksheet（工作表）对象

;知识点;一、Worksheet对象和Worksheets集合;二、引用工作表的方式;2.1、使用工作表的名称;例：;2.2使用工作表的编号;使用Worksheet对象的Index属性可以返回工作表的编号：

MsgBoxWorksheets(工作表名).Index

(即在工作薄中的编号)

;例：;2.3、使用工作表的代码名称;例：;3、使用ActiveSheet属性引用活动工作表;工作表的添加与删除;工作表的添加与删除;三、工作表的添加与删除;3.2、工作表中插入行;3.3、限制工作表的滚动区域;限制工作表的滚动区域;限制工作表的滚动区域;四、工作表的保护与解除保护;工作表的解除保护;对其中一张工作表进行保护方法２：

１，选择其中一张工作表；

２，在事件中选择“active”

３，假设对sheet1进行保护，则可以在事件中，输入以入代码：;PrivateSubWorksheet_Activate()

sheet2.Select

EndSub

注意：实际上是在打开sheet1时将活动工作表转移到sheet2上面。;对指定区域保护;PrivateSubWorksheet_SelectionChange(ByValTargetAsRange)

DimstrAsString

IfTarget.Column=1Then

str=Application.InputBox(请输入修改密码)

Ifstr=123Then

Application.EnableEvents=False

EndIf

Else

Application.EnableEvents=True

EndIf

EndSub

;单元项目实训：