Mega Code Archive

 

Categories / VisualBasic Script / Excel

 

Stores the current SheetsInNewWorkbook property, sets the SheetsInNewWorkbook property to 12, creates a new workbook (with those 12

Sub Sheets()     Dim mySiNW As Integer     mySiNW = Application.SheetsInNewWorkbook     Application.SheetsInNewWorkbook = 12     Workbooks.Add     Application.SheetsInNewWorkbook = mySiNW End Sub