Question

怎么用VBA用控制 新建Excel sheet 数目?

我想新建一个Excel只含有1个sheet ,我目前只会这么写,
Workbooks.Add
Sheets.Add
Newmaxsheet=sheets.count
For Up = 1 To Newmaxsheet - 1
Sheets(1).Delete
Next Up

Answer 1

实际上不用这么麻烦，有更简单的方法：
在菜单上选择“工具”→“选项”中的“常规”下，有一个新工作簿内的工作表数，你把缺省的3改为1 就行了。
如果你是练习VAB，那另当别论。

追问

手工的我会设置, 我做程序得需要.
这个文件需要1个sheet ,那个文件需要7个sheet,不同的,
再说,我做的程序还要发给大家使用

追答

告诉大家设置方法就行了。简单的事复杂化了。告诉别人的方法也要简单。

Answer 2

Application.SheetsInNewWorkbook
可调用或者更改该参数。