4.7.2小节中的程序先计算出当前打开的工作簿个数，再利用索引号引用工作簿，依次判断工作簿的名称是否是“成绩表.xls”。

根据同样的思路，你能编写一个程序，判断当前活动工作簿中是否存在标签名称为“一年级”的工作表吗？试一试，编写一个这样的程序，如果没有这张工作表，就新建一张标签名称为“一年级”的工作表放在所有工作表之前，如果工作表已存在，将其移动到所有工作表之前。

参考答案

或

4.7.3　判断工作簿是否存在

文件夹中存了许多工作簿文件，想知道“员工花名册.xls”文件是否存在，可以用这个程序：

4.7.4　向未打开的工作簿中录入数据

4.7.5　隐藏活动工作表外的所有工作表

4.7.6　批量新建工作表

一张成绩表的C列保存着许多不同的班级名称，如图4-61所示。

图4-61　成绩表

根据C列的班级名新建不同的班级工作表，工作表以班级名命名，可以用这个程序：

运行程序后VBA会自动完成新建工作表的任务，如图4-62所示。

图4-62　程序运行前后