带有一个命名工作表的Excel宏VBA新工作簿

2 回答

• 0

  认为这就是你要找的东西

  首先创建一个新工作簿，然后在开始之前添加一个新工作表，然后将其重命名为“选项” . 其余的工作表应遵循默认的命名模式

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

  回复于 2024-05-03T21:11:11+08:00
• 2

  下面的代码将添加一个新的 Workbook ，只有一张名为"Options"的表 .

  但是，关于第二部分，为了从“Sheet1”而不是“Sheet2”开始，它涉及向新创建的工作簿添加代码，因为默认情况下新工作簿已经有1个名为“Options”的工作表，所以实际上你是添加第二个工作表，以便Excel自动将其命名为“Sheet2”

  Option Explicit
  
  Sub CreateNewWB()
  
  With Application
      .SheetsInNewWorkbook = 1
      .Workbooks.Add
      .Sheets(1).Name = "Options"
  End With
  
  End Sub
  

  回复于 2024-05-03T21:11:11+08:00