VBA实战技巧精粹011：新建只有1张工作表的工作簿

问题提出：默认情况下，新建工作簿时都是给出3张工作表，如果在让老师们整理一些材料时，不清楚的老师往往乱点，如果一个工作簿只有1张工作表的话，就可以有效地避免这个现象。

解决代码：

Sub AddNewWorkbook()

Workbooks.Add Template:=xlWBATWorksheet '以工作表作为模版，此时只建立一张工作表

Workbooks.Add '若不加模版参数，则为默认3张工作表

End Sub

本文用菊子曰发布