2017-03-21 174 views

回答

0

認爲這是你在找什麼

這首先創建一個新的工作簿,然後將其改名爲「選項」前增加了開頭新的工作表。那麼表的其餘部分應該按照默認命名模式

Option Explicit 
Public Sub NewWorkbook() 
    With Workbooks.Add 
     With .Sheets.Add(Before:=.Sheets(1)) 
      .Name = "Options" 
     End With 
    End With 
End Sub 
+0

它不能按照我想要的方式工作。我可以嘗試更好地解釋我的問題。在新的工作簿中,我希望只有一張名爲「選項」的工作表,如果用戶想要添加附加工作表,則會開始從「工作表1」中添加工作表。目前在你的例子中,我得到一個新的工作簿,其中「選項」表單和「Sheet1」已經打開。另外,如果我嘗試添加第三張紙張,它將從「Sheet3」開始,而不是「Sheet2」,如我所願。 – Anne

0

下面的代碼將添加一個新的Workbook只有1名爲「選項」頁。

然而,關於第二部分,爲了從「Sheet1」而不是「Sheet2」開始,它涉及向新創建的工作簿添加代碼,因爲默認情況下新工作簿已經有一個名爲「Options」的工作表,所以實際上,您正在添加第二張工作表,因此Excel會自動將其命名爲「Sheet2」

Option Explicit 

Sub CreateNewWB() 

With Application 
    .SheetsInNewWorkbook = 1 
    .Workbooks.Add 
    .Sheets(1).Name = "Options" 
End With 

End Sub 
+0

這一天的課程 - .SheetsInNewWorkbook'。我從來不知道這一點 - 我一直使用'Workbooks.Add xlWBATWorksheet'來創建一個新的工作簿。當查看'Workbooks.Add'時,幫助文件甚至提到'SheetsInNewWorkbook'。但它會覆蓋當前的設置,所以在更改它之前可能需要讓代碼記住原始設置 - 我的工作簿現在都是使用5張工作表創建的。 –

相關問題