VBA如何在新建的workbook中增加sheet

VBA代码可以通过记录宏来得到。

举例说明。

第一步：按开发工具-录制宏。如图：

第二步：新建工作簿-插入新的工作表。

第三步：按停止录制按钮。如图：

这样就得到了刚才新建工作簿，插入新表的代码。如下所示：

Sub Macro5()

'

' Macro5 Macro

'

'

  Workbooks.Add

  Sheets.Add After:=Sheets(Sheets.Count)

End Sub

打开Excel带出3个Excel表格，可能是在Excel中添加了打开事件。

软件版本：Office2007

原因说明如下：

1.Alt+F11打开VBE界面，在Thisworkbook中，添加workbook open事件，并添加代码如下：

2.将Excel文件存储为启用宏的xlsm格式文件：

3这样，每次打开这个文件，都会自动生成3个新的工作簿：

注意事项：如果想禁用这个功能，可以在安全性里面的宏安全性，设置为禁用任何宏。

---