(vba编程excel实例)(vba编程excel实例视频)

Sheets　

Description

描述

VBA Code

Activate by Tab Name

按选项卡名称激活

Sheets(“Input”).Activate

Activate by VBA Code Name

通过 VBA 代码名称激活

Sheet1.Activate

Activate by Index Position

按索引位置激活

Sheets(1).Activate

Next Sheet

下一个工作表

ActiveSheet.Next.Activate

Get ActiveSheet

获取 ActiveSheet

MsgBox ActiveSheet.Name

Select Sheet

选择工作表

Sheets(“Input”).Select

Set to Variable

设置为变量

Dim ws as Worksheet

Set ws = ActiveSheet

Name / Rename

名称/重命名

ActiveSheet.Name = “NewName”

Add Sheet

添加工作表

Sheets.Add

Add Sheet and Name

添加工作表和名称

Sheets.Add.Name = “NewSheet”

Add Sheet to Variable

将工作表添加到变量

Dim ws As Worksheet

Set ws = Sheets.Add

Copy Sheet

复制工作表

Sheets(“Sheet1”).Copy Before:=Sheets(“Sheet2”)

Hide Sheet

隐藏工作表

Sheets(“Sheet1”).visible = False

or

Sheets(“Sheet1”).visible = xlSheetHidden

Unhide Sheet

取消隐藏工作表

Sheets(“Sheet1”).Visible = True

or

Sheets(“Sheet1”).Visible = xlSheetVisible

Very Hide Sheet

深度隐藏表

Sheets(“Sheet1”).Visible = xlSheetVeryHidden

Delete Sheet

删除工作表

Sheets(“Sheet1”).Delete

Clear Sheet

清除表

Sheets(“Sheet1”).Cells.Clear

Unprotect (No Password)

取消保护（无密码）

Sheets(“Sheet1”).Unprotect

Unprotect (Password)

取消保护（密码）

Sheets(“Sheet1”).Unprotect “Password”

Protect (No Password)

保护（无密码）

Sheets(“Sheet1”).Protect

Protect (Password)

保护（密码）

Sheets(“Sheet1”).Protect “Password”

Protect but Allow VBA Access

保护但允许 VBA 访问

Sheets(“Sheet1”).Protect UserInterfaceOnly:=True