vba - 创建一个新的 Excel 工作簿

Question

有人可以帮助我使用以下代码：

Dim NewOutputFile As Workbook
Set NewOutputFile = Workbooks.Add(FileName & ".xls")

在哪里FileName = "C:\Documents and Settings\me\My Documents\file.xls"

我想动态创建一个新工作簿，然后添加新选项卡：

NewOutputFile.Sheets.Add ("New tab")

编辑当我说“工作簿”时，我的意思是一个新的 excel 文件

Answer 1

NewOutputFile.Sheets.Add().Name= "New tab"

或者，如果您想添加一个工作表作为最后一个工作表：

NewOutputFile.Sheets.Add(After:=NewOutputFile.Sheets(NewOutputFile.Sheets.Count)).Name = "New tab"