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 程序运行前后