今日学习目标

  • 掌握Worksheet对象的基本操作
  • 学会添加、删除、重命名工作表
  • 了解工作表保护

知识点

1. Worksheet对象

vba
' 引用工作表
Worksheets("Sheet1")
Sheets("Sheet1")
ActiveSheet
' 添加工作表
Worksheets.Add
' 删除工作表
Worksheets("Sheet1").Delete

2. 常用操作

  • Name：工作表名称
  • Visible：可见性
  • Protect：保护工作表

今日代码

vba
' 引用工作表
Worksheets("Sheet1")
Sheets("Sheet1")
ActiveSheet

' 添加工作表
Worksheets.Add

' 删除工作表
Worksheets("Sheet1").Delete

练习题

  1. 创建带日期命名的工作表
  2. 批量重命名工作表
  3. 隐藏/显示工作表

参考解答

1. Worksheets.Add后，使用ActiveSheet.Name = Format(Date, "yyyymmdd")命名。 2. 使用For循环遍历工作表，根据序号或规则重命名，如"表" & i。 3. Worksheets("Sheet1").Visible = xlSheetHidden隐藏，= xlSheetVisible显示。

由在线工具箱(www.vba.net)整理制作