Add sheet to workbook excel

Note: Sheet tabs are displayed by default. If you don’t see them, click Options > Advanced > Display options for this workbook > Show Sheet tabs.

To insert a new worksheet, do one of the following:

• To quickly insert a new worksheet at the end of the existing worksheets, click the Insert Worksheet tab at the bottom of the screen.

  

• To insert a new worksheet in front of an existing worksheet, select that worksheet and then, on the Home tab, in the Cells group, click Insert, and then click Insert Sheet.

  

  Tip: You can also right-click the tab of an existing worksheet, and then click Insert. On the General tab, click Worksheet, and then click OK.

  Note: To change the order of the worksheets in a workbook, click the tab of the worksheet that you want to move, and then drag it to the location that you want.

Do you need to add a new sheet tab to your Excel workbook? This post is going to show you all the ways that you can insert a new sheet in Excel!

Excel allows you to add multiple sheets within a workbook. This is a great way to organize your spreadsheet solutions as you can separate your inputs, data, calculations, reports, and visuals into different sheets.

Organizing your workbooks with sheets can also make the spreadsheet easier to navigate for any user.

How can you add new sheets to an Excel workbook? Follow this post to find out all the ways to add sheet tabs in Excel. You’ll even learn how to add multiple sheets based on a list!

Add a New Sheet with the New Sheet Button

The quickest and easiest way to insert a new sheet in Excel is using the New Sheet button located to the right of the current sheet tabs.

Left click on the plus sign icon to the right of the sheet tabs and Excel will create a new blank sheet in your workbook!

Add a New Sheet from the Home Tab

Adding a new sheet can also be done from the Excel ribbon.

You might think this action would be located in the Insert tab, but it will actually be found in the Home tab.

Follow these steps to insert a new sheet from the Home tab.

1. Go to the Home tab.

1. Click on the lower part of the Insert command found in the Cells section.
2. Choose the Insert Sheet option from the menu.

This will create a new sheet in your workbook.

Add a New Sheet with a Keyboard Shortcut

Good news for anyone who prefers to navigate Excel with their keyboard as much as possible! There is a dedicated keyboard shortcut for adding a new sheet.

Press Shift + F11 on your keyboard to insert a new sheet.

Add a New Sheet with Excel Options

When you create a new Excel workbook, the number of sheets it comes with will be determined by your Excel Options settings.

You can change this default so that any time you create a new workbook, it will have your desired number of blank sheets available.

The Excel Options menu allows you to customize your Excel experience with various app and workbook settings.

Follow these steps to adjust the default number of sheets in a workbook.

1. Go to the File tab.
2. Select Excel Options in the lower left.
3. Go to the General section of the Excel Options menu.
4. Scroll down to the When creating new workbooks section.
5. Change the number in the Including this many sheets input.
6. Press the OK button.

The next time you create a new Excel workbook, it will have your desired number of blank sheets.

💡 Tip: You can test out this new setting by pressing Ctrl + N to create a new workbook.

Add Multiple New Sheets with a Pivot Table

Did you know you can create multiple sheets from a list in the grid by using a pivot table?

This is a hidden gem for when you need to quickly create many sheets.

For example, suppose you need to create new sheets for each US state or each product that your company sells. This would be a tedious process with the previous methods.

If you have these sheet names as a list inside the grid, then you can create a pivot table based on this list and use the Show Report Filter Pages feature to generate the sheets for you.

This example shows a list of US states which can then be used to generate sheets with those US state names.

Follow these steps to automatically generate sheets from a list using a pivot table.

1. Create a pivot table based on your list.

💡 Tip: Check out this post to see how to insert a pivot table from your list.

1. Click and drag the sheet name field to the Filters area in the PivotTable Fields menu.

1. Go to the PivotTable Analyze tab.
2. Click on the Chevron icon in the Options command.
3. Choose the Show Report Filter Page option from the menu.

This will open the Show Report Filter Pages menu.

1. Select the field with your sheet names.
2. Press the OK button.

You will only see multiple field choices in the menu if you have added multiple fields to the Filters area of your pivot table.

This will create a new sheet for each unique item in your list, and each sheet will be named based on the text in your list.

Each sheet will contain a filtered version of your pivot table in cell A1. The pivot table will be filtered on the same item as the sheet name.

Add Multiple New Sheets with VBA

VBA is a great way to automate any task for Excel in the desktop app. This includes adding sheets!

You can create a VBA macro that will create new sheets based on a selected list.

Go to the Developer tab and select the Visual Basic command or press Alt + F11 to open the visual basic editor.

📝 Note: You might need to enable the Developer tab first as it is disabled by default.

Go to the Insert menu in the visual basic editor and select the Module option from the menu.

Sub AddSheets()
Dim myRange As Range
Dim sheetTest As Boolean
Set myRange = Selection

For Each c In myRange.Cells
sheetTest = False
    For Each ws In ThisWorkbook.Worksheets
        If ws.Name = c.Value Or c.Value = "" Then
            sheetTest = True
        End If
    Next ws
    If Not (sheetTest) Then
          Sheets.Add.Name = c.Value
    End If
Next c
End Sub

Paste the above code into the new module.

This code will loop through the selected range in your workbook and will create a new sheet for each cell. If the sheet name already exists, then this item will be skipped.

Now you will be able to select any range in your workbook and run the VBA code to automatically create multiple sheets.

Add Multiple New Sheets with Office Scripts

Another way you can automate the creation of your sheets is by using Office Scripts.

Office Scripts is the JavaScript language for automating tasks in Excel online. You will need to be using Excel on the web with a business Microsoft 365 account as this feature isn’t available otherwise.

Open Excel online and go to the Automate tab and select the New Script option. This will open the Office Script editor on the right side.

function main(workbook: ExcelScript.Workbook) {

	//Create an array with the values in the selected range
	let selectedRange = workbook.getSelectedRange();
	let selectedValues = selectedRange.getValues();
	//Get dimensions of selected range
	let rowHeight = selectedRange.getRowCount();
	let colWidth = selectedRange.getColumnCount();

	//Loop through each item in the selected range
	for (let i = 0; i < rowHeight; i++) {
		for (let j = 0; j < colWidth; j++) {
			try {
				workbook.addWorksheet(selectedValues[i][j]);
			}
			catch (e) {
				//do nothing
			};
		};
	};
};

Add the above code to the editor and press the Save script button.

This code will loop through the selected range on your sheet and create a new sheet for each item in the range.

Now you select a range in your sheet and press the Run button in the Code Editor. This will run the code and create the required sheets in your workbook!

Add Multiple New Sheets with Power Automate

Microsoft Power Automate is a cloud-based service that makes it easy for end users to create and run automated workflows.

Users can build workflows in a matter of minutes, without any need for coding or complex configuration with the intuitive user interface.

The service can be used to automate a wide range of tasks, including sending emails, copying files, and creating records in databases.

Power Automate is part of the Microsoft Power Platform, which also includes Power BI and Power Apps. Together, these products provide a powerful end-to-end solution for business process automation.

But the best part is it’s available for use as part of any Microsoft 365 subscription!

You can use Power Automate to create sheets from a list inside an Excel Table. In this example, the desired sheet names are in an Excel Table with a column named Names.

📝 Note: This Excel file will need to be saved in either SharePoint or OneDrive in order to work with Power Automate.

Go to the Power Automate Portal and log in with your Microsoft credentials.

Then go to the Create tab and select an Instant cloud flow. This will allow you to run the flow manually with a button in the Power Automate portal.

Give your Flow a name then select the Manually trigger a flow option and then press the Create button.

This will open the flow builder and you can add steps to your workflow.

1. Add a List rows present in a table step and then select the relevant file and table location in the various fields.

This action will read all the items in your table of sheet names. This will be used in the next step to create and name new worksheets.

1. Add a Create worksheet step and select the same file.
2. Select the Names field from the previous List rows present in a table action.

When you add the Names field to the Name input in the Create worksheet step, it will automatically add this step into an Apply to each action. This way a worksheet will be created for each item in your list of sheet names.

Press the Save button to save your flow and it will be ready to run!

Go to the My flows menu, select the Cloud flows tab, and then press the Run button for your flow.

You don’t even have to have the file open, and the sheets will be added to your workbook!

Conclusions

Most of your workbooks will need more than one sheet, so learning how to add sheets in Excel is essential.

There are manual ways to create new sheets such as the New Sheet button, the Home tab, and a keyboard shortcut. There are all great methods when you only need to add a few sheets.

There are also several methods for adding sheets in an automated manner based on a list! VBA, Office Scripts, Power Automate, and even pivot tables can all be used for situations where you need to add a lot of sheets.

Which method do you prefer for adding sheets to your workbooks? Do you have any other tips for this? Let me know in the comments section below!

Working with MS Excel means working in the worksheets in Excel.

A worksheet is an area that has all the cells where you can store data, enter formulas, insert charts and create reports and dashboards.

When you open a new Excel workbook file, by default there is only one worksheet. Earlier versions of Excel (2013 or 2016 used to have 3 worksheets by default)

There are some simple shortcuts and techniques that you can use to quickly insert new worksheets in the same workbook in Excel.

In this tutorial, I will show you a couple of methods that you can use to insert a new worksheet in the same workbook (one at a time).

I will also show you a method to quickly insert worksheets in bulk, in case you want to add 5, 10, or 20 worksheets in one go (using a simple VBA code).

So let’s get started!

Keyboard Shortcut to Insert a New Worksheet

If you are a fan of keyboard shortcuts, this is probably the fastest way to insert a new worksheet in an already open workbook in excel.

Below is the keyboard shortcut to insert a new worksheet

SHIFT + F11

For this shortcut, hold the SHIFT key and then press the F11 key.

Another keyboard shortcut that does the same job is ALT + SHIFT + F1 (hold the ALT and the SHIFT keys and press the F1 key)

Personally, I find using the keyboard shortcut to be the best way to insert a new worksheet in Excel. Even if I have to insert multiple worksheets (say 3 or 5 or 10), I can still do that very quickly

Insert New Sheet Using the Plus Icon

If you’re not a big fan of keyboard shortcuts and prefer using the mouse instead, this method is for you.

At the bottom of your worksheet (in the area that has all the sheet names), you will see the plus icon.

Clicking on this plus icon will immediately insert a new worksheet.

Insert New Sheet Using the Insert Dialog Box

Another way to insert a new sheet in Excel is by using the Insert dialog box.

Below are the steps to do this:

1. Right-click on any of the sheets
2. Click the Insert option

1. In the Insert dialog box, make sure Worksheet is already selected (which is also the default option).

1. Click on Ok

While this is not the fastest way to add a new sheet in an Excel workbook, it’s good to know as it gives you access to some other things as well.

Apart from inserting a regular worksheet, you can also use this to insert a ‘Chart Sheet’ or a ‘Macro Sheet’ using the insert dialog box.

If you’re wondering, a Chart Sheet is just like a worksheet but is meant only to hold a chart. A macro sheet is something that was used earlier before the VBA days and is no longer used.

In most cases, you won’t be needing these, but it’s good to know.

There is also the Spreadsheet Solutions tab that holds some of the templates. You can also create and get your own templates here. So the next time you need to quickly insert a template, you can do it from here.

Adding New Worksheets Using the Insert Tab in the Ribbon

And finally, you also have an option in the Excel ribbon to add a new worksheet.

To do this:

1. Click the Home tab

1. In the Cells group, click on the Insert option

1. Click on the Insert Sheet option.

This will insert one new worksheet in the open workbook

How to Insert Multiple Worksheets in One Go (One Line VBA Code)

So far, the methods that I have shown you insert one new worksheet at a time.

In case you want to insert multiple worksheets, you would have to use these methods again and again (i.e., use the keyboard shortcuts multiple times or use the plus icon multiple times).

While this works fine in most cases, if you have to insert worksheets in bulk, saying so 10 or 20 or 30 worksheets in one go, then this could be time-consuming and error-prone.

So let me show you a better way to insert multiple new worksheets in one go.

This can be done easily using a simple one-line VBA code:

Sheets.Add Count:=10

The above code would instantly add 10 new sheets in the workbook in which it’s run (if you want any other number of sheets to be added, just change the value in the code)

Below are the steps to run this macro code:

1. Click the Developer tab (or use the keyboard shortcut ALT + F11) and then click on Visual Basic

1. If you don’t see the immediate window in the VB Editor, click on the View option and then click on Immediate window

1. Copy and paste the above code in the immediate window

1. Place the cursor at the end of the VBA code line and hit Enter

As soon as you hit Enter, it would instantly insert 10 new sheets in the workbook. In case you want to insert more (say 20 or 30), just change the number in the code

The good thing about using this code is that you can be sure that it would insert the right number of sheets (no chance of human error if the code is executed without any errors).

In case you need to do this quite often, you can use the below code and paste it into our Personal Macro workbook.

Sub AddSheets()
Sheets.Add Count:=10
End Sub

Once in Personal Macro Workbook, you can add it to the Quick Access Toolbar so you always have access to it in the workbook.

This way, you can easily add 10 or 20 sheets with just a single click.

Changing the Default Number of Sheets with New Excel Workbooks

If you always have a need for more worksheets in the workbook, you can change the default number of sheets you get when you open a new Excel file.

For example, you can change the setting so that you always get 5 or 10 sheets by default with every newly opened workbook.

Below are the steps to change this default setting:

1. Open any Excel workbook
2. Click the File tab

1. Click on Options. This will open the Excel Options dialog box
2. In the Excel Options dialog box, make sure the General option is selected in the left-pane

1. In the ‘When creating new workooks’ section, enter the number of sheets you want (in the Include this many sheets value).

1. Click OK

Now when you open a new Excel workbook, it will have the specified number of worksheets.

Note that an Excel file can have a maximum of 255 sheets.

These are all the ways you can use to insert a new sheet in Excel. In most cases, you only need to add one or a couple of new sheets, so you can use the keyboard shortcut or the plus icon in the worksheet.

And in case you have a need to insert many new sheets in bulk, you can use the VBA code. Alternatively, you can also change the default number of sheets in any new Excel workbook.

I hope you found this tutorial useful!

Other Excel tutorials you may also like:

• How to Delete Sheets in Excel (Shortcuts + VBA)
• How to Rename a Sheet in Excel (4 Easy Ways + Shortcut)
• How to Print Excel Sheet on One Page (Fit to One Page)
• How to Group Worksheets in Excel (Step-by-Step)
• How to Compare Two Excel Sheets (for differences)
• How to Move Chart to New Sheet in Excel?
• Count Sheets in Excel (using VBA)

In this article we will show you how to add a sheet to an Excel workbook using VBA. There are 2 different methods detailed below in order to do this.

To add a sheet to a workbook using VBA:

Depending on the result you want to achieve, you can either use the:

• Copy method => For a copy of an existing sheet
• Add method => To add a new blank sheet to your workbook.

You must also make sure that the name of the new sheet is compliant. That is to say, the name of the sheet should not be identical to an existing one or contain any forbidden characters. In both cases, the verification methods should be the same.

Copy method

Copy a sheet. The data and format of the new sheet will be identical to the source sheet.

Syntax

expression .Copy(Before, After) Expression can either be a Sheet or Worksheet object. The Before and After parameters are optional. You can only specify one of these two parameters. They are of the Variant type and can either represent the sheet locate before or after the one you want to copy. If the parameter is omitted, the sheet is automatically copied into a new workbook.

What happens then?

When creating a new sheet with the Copy method:

• The sheet is created at the desired location (before or after another sheet in the workbook)
• It is renamed based on the name of the source sheet. Example: Sheet1 => Sheet1(2)
• It is identical to the copied sheet.
• It becomes the active sheet. If the sheet is copied to a new workbook, it becomes the active workbook.

Examples of use

Copy the «Sheet1» after «Sheet3»

Worksheets("Sheet1").Copy After:=Worksheets("Sheet3")

Copy the «Sheet4» before the «Sheet2»:

Sheets("Sheet4").Copy Before:=Sheets("Sheet2")

Copy the «recap» sheet in a new workbook

Worksheets("recap").Copy

Copy the sheet indexed as 1 at the last position of the workbook, regardless of the name of the last sheet:

Sheets(1).Copy After:=Sheets(Sheets.Count)

Copy the sheet indexed as 10 at the beginning of the workbook, regardless of the name of the last sheet:

Sheets(10).Copy Before:=Sheets(1)

You want to copy multiple sheets of your active workbook into a new workbook:

Sheets(Array("Sheet1", "Sheet3", "Sheet5")).Copy

The Add Method

Creates a new spreadsheet (graphics or macro). The new worksheet becomes the active sheet. This new sheet doesn’t contain any data or formatting.

Syntax

expression .Add(Before, After,Count,Type) Expression can either be a Sheet or Worksheet object. The Before, After, Count and type parameters are optional. Either and Before — You can only specify one of these parameters. They are of the Variant type and can either represent the sheet locate before or after the one you want to copy. The Count parameter is also a Variant. It represents the number of sheets you want to add. The Type parameter represent the type of sheet you want to add.

• xlWorkSheet — adds a worksheet
• xlChart — adds a chart sheet
• xlExcel4MacroSheet — adds a macro sheet (Excel4)
• xlExcel4IntlMacroSheet — adss a macro sheet
• xlDialogSheet — adds a dialog sheet.

NB: Don’t forget to rename your parameters or the syntax will return the below error:

ActiveWorkbook.Sheets.Add Before:=Worksheets(Worksheets.Count), , 1, xlChart

Examples of use

Put a sheet after the last sheet in the workbook:

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

Adds three sheets at the «first position» of the active workbook:

 ActiveWorkbook.Sheets.Add Before:=Worksheets(1), Count:=3

Adds a chart sheet in a workbook named «Wbk18» (Open!) after the sheet named «Sheet4»

WorkBooks("Wbk18").Sheets.Add After:=Worksheets("Sheet4"), Type:=xlChart

Testing the sheet

Check if sheet already exists in the workbook

'Test si la feuille existe déjà
Function Feuil_Exist(strWbk As String, strWsh As String) As Boolean

'Gestionnaire d'erreur
On Error Resume Next
    '"Test"
    Feuil_Exist = (Workbooks(strWbk).Sheets(strWsh).Name = strWsh)
End Function

Check if the filename contains forbidden characters

'Test si la chaine contient un caractère à éviter
Function Valid_Name(strName As String, strChr As String) As Boolean
Dim i As Byte, Tb_Car() As String, strProhib As String

strProhib = "/:*?""<>|" ' Liste des caractères à éviter
Tb_Car = Split(StrConv(strProhib, vbUnicode), Chr$(0))
'Boucle sur tous les caractères à éviter
 'Nota : le -1 est dû au Split de la chaine par le séparateur Chr(0)
 'En effet, la chaine se terminant par un Chr(0) il convient d'exclure ce dernier caractère
For i = LBound(Tb_Car) To UBound(Tb_Car) - 1
    'Test si la chaîne contient un caractère prohibé
    If InStr(strName, Tb_Car (i)) > 0 Then
 'Si oui : Return False
        Valid_Name = False
 'ET Retourne le caractère prohibé
        strChr = Tb_Car(i)
        Exit Function
    End If
Next i
'Si OK : Return True
Valid_Name = True
End Function

Calling the verification function

The code is the same for both the Copy or Add method.

Sub Principale()
Dim strNewName As String, strCara As String

strNewName = "NewSheet"
If Valid_Name(strNewName, strCara) = False Then
    MsgBox "Le nom : " & strNewName & " est invalide." & vbCrLf & _
            "Un nom de feuille ne peut pas contenir le caractère : " & strCara, vbCritical
    Exit Sub
End If
If Feuil_Exist(ThisWorkbook.Name, strNewName) = True Then
    MsgBox "Le nom : " & strNewName & " est invalide." & vbCrLf & _
            "Ce nom de feuille est déjà utilisé dans ce classeur.", vbCritical
    Exit Sub
End If
ThisWorkbook.Sheets.Add 'Ou : ThisWorkbook.Sheets("Feuil1").Copy After:=Sheets(Sheets.Count)
ActiveSheet.Name = strNewName
End Sub

Some useful tips for Office 2013

Office 2013 brings two complementary methods to those seen previously:

• Copy a range of cells to a sheet and multiple sheets
• The Add2 method for collections of Charts objects.

Copy a range of cell using the FillAcrossSheets method

This method is only available for Office 2013. You want to copy range of cells from «Sheet1» to «Sheet3», «Sheet5» and «Sheet7».

Sheets = Array("Sheet3", "Sheet5", "Sheet7")
Sheets(Sheets).FillAcrossSheets Worksheets("Sheet1").Range("A1:C5")

The parameters of this method are:

• Range: Required
• Type: Optional
• xlFillWithAll: Copy the contents and formats.
• xlFillWithContents: Copy the contents.
• xlFillWithFormats: Copy formats.

The Add2 method

This method is only available for Office 2013. The method applies to collections of Charts objects and returns a «Runtime» error when used with Sheets and WorkSheets objects. No more info on Microsoft.com except the syntax: expression .Add(Before, After,Count,NewLayout) Expression represents a Worksheet object. The parameters are identical to the Add method, simply replace the Type parameter with NewLayout. If NewLayout is set to True, the graphic is inserted using the new rules.

any more excel questions? check out our forum!

The Excel worksheet – is the workspace under the toolbar. This sheet consists from a set of cells arranged among it selves relative to rows and columns.

Its appearance resembles to a large table. There are 3 sheets are default in each new Excel workbook.

For the user, the sheet is a file with a document that is nested in the folder (Excel workbook). Sheets can and should be managed. The sheets can be moved in other workbooks. This operation saves a lot of time than just copying and transferring the contents of the sheet itself.



Excel sheets as a data environment

In a standard book, each sheet is the large tables, that are filled with data and formulas. How to add a sheet in Excel? As necessary, you can insert the additional sheets (SHIFT+F11) or delete unused ones. To create a new worksheet in Excel, you can clicking on the last tab of the sheets, as it shown in the picture:

The book can contain from 1 to 255 sheets.

How do I copy a worksheet to Excel? For fast implementation of this task it is necessary:

1. To point the mouse cursor on the sheet tab (shortcut) that you need to copy.
2. To make the click with the left button of the teddy bear, holding down the button + CTRL key and move the cursor to the place of the bookmarks where the copy should be inserted.

If there are too many sheets, or if you need to copy / move a sheet to a new workbook, then we do the following:

1. Right-click on the bookmark tab (shortcut) to call the context menu, where we select the option «Move or Copy …».



2. In the window that appears, we configure the parameters for copying the worksheet. From the top you need to choose what of the opening work books should copy. Below we indicate, what sheets to insert a copy between.



3. If we copy the sheet, but do not transfer it, check the «Create a copy» option.



The exercises with sheet elements

Task 1: Click on each element shown in the picture above and try to remember its location, name.

Task 2: Click on the tabs located in the bottom (Sheet2, Sheet3 and Sheet1) alternately. After clicking, the tab of each sheet becomes active, and its bookmark is highlighted.

Note: each book can contain a lot of sheets (up to 255 pcs.), similar to how the folder contains files.

Various operations with sheets will be considered in the following lessons.

Working with Sheet Cells

The most important element of the sheet is the cell. Each cell has its own sequence number relative to the rows and a Latin letter relative to the columns. Thus, each cell has its own address (like cells in a chessboard). That is, the first cell (in the upper left corner) has the address A1, and under it the cell with the address A2. On the right side of the cell address B1, etc.

The number of rows in each sheet of Excel 2010 is slightly more than one million, more precisely is 1 048 578 pcs. The number of columns is much smaller — 16 384 pcs.

Pay attention! After 26 Latin letters, the name of the columns is no longer of one, but of 2 or more letters in logical, alphabetical order. Thus, the address of the last cell in the bottom-right corner of the sheet is XFD1048578.

Each cell can be written:

• text;
• number;
• date and time;
• formulas;
• logical expressions.

Each cell can be formatted and assigned a note. All data and cell formatting styles can be changed. It is also worth noting that formatting the borders of cells is the key basis for designing the appearance of tables (for example, for printing forms, etc.).

Once you start learning VBA one of the coolest things you can do is to write a VBA code to insert new a worksheet in a workbook.

Well, there is already a shortcut key to insert a new worksheet or you can also use the normal option but the benefit of using a VBA code is you can add multiple worksheets with a single click and you can also define that where you want to add it.

For this, you need to use the Sheets.Add method, and in this post, we will be learning how to use it to add one or more worksheets in a workbook.

Sheets.Add Method

Sheets.Add ([Before], [After], [Count], [Type])

• Before: To add a new sheet before a sheet.
• After: To add the new sheet before a sheet.
• Count: Number of sheets to add.
• Type: Type of the sheet you want to add (LINK)

Open the visual basic editor and follow these steps.

• First, you need to enter Sheets.Add method.
• Then you need to define the place to add the new sheet (Before or After).
• Next thing is to enter the count of worksheets.
• In the end, the type of sheet.

Different Ways to Add New Sheets in a Workbook using a VBA Code

Below you have different ways to add a new sheet to a workbook:

1. Add a Single Sheet

To add a single sheet, you can use the below code, where you didn’t specify any argument.

Sub SheetAddExample1()
ActiveWorkbook.Sheets.Add
End Sub

This code tells Excel to add a sheet in the active workbook, but as you don’t have any argument it will use the default values and add one worksheet(xlWorksheet) before the active sheet.

Here’s one more way to write this, check out the below code.

Sub SheetAddExample2()
Sheets.Add
End Sub

As you are already in the active workbook you can use the below code as well. It does the same thing.

2. Add Multiple Sheets

To add multiple sheets in one go, you just need to define the COUNT argument with the number of sheets you want to add.

Sub AddSheets3()
Sheets.Add Count:=5
End Sub

Now the count of the sheets that you have defined is 5, so when you run this code it instantly adds the five new sheets in the workbook.

3. Add a Sheet with a Name

If you want to rename the sheet after adding it, you can use the following code:

Sub AddNewSheetswithNameExample1()
Sheets.Add.Name = "myNewSHeet"
End Sub

In the above code, we have used the name object (LINK) which helps you to specify the name of a sheet.

4. Add a Sheet with a Name from a Cell

You can also take the value to use as the sheet’s name from a cell.

Sub AddNewSheetswithNameExample2()
Sheets.Add.Name = Range("A1")
End Sub

In the above code, cell A1 is used to get the name for the new sheet.

5. Add a Sheet After/Before a Specific Sheet

As these arguments are already there in the Sheets.Add where you can specify the sheet to add a new sheet before or after it.

Sub AddSheetsExample5()
Sheets.Add Before:=Worksheets("mySheet")
Sheets.Add After:=Worksheets("mySheet")
End Sub

Now in the above code, you have two lines of code that you have used before and after an argument in the Sheet.Add method. So, when you run this code it adds two sheets one is before and one is after the “mySheet”.

6. Add a New Sheet at Beginning

By using the before argument using you can also add a sheet at the beginning of the sheets that you have in the workbook.

So basically, what we are going to do is we’re going to specify the sheet number instead of the sheet name.

Sub AddSheetsExample6()
Sheets.Add Before:=Sheets(1)
End Sub

In the above code, you have used sheet number (1) that tells VBA to add the sheet before the sheet which is in the first position in all the worksheets. In this way, it will always add the new sheet at the beginning.

7. Add a New Sheet at the End (After the Last Sheet)

To add a new sheet in the end you need to write the code in a different way. So, for this, you need to know how many sheets there in the workbook are so that you can add a new sheet at the end.

Sub AddSheetsExample8()
Sheets.Add After:=Sheets(Sheets.Count)
End Sub

In the above code, Sheet.Count returns the count of the sheets that you have in the workbook, and as you have defined the after argument it adds the new sheet after the last sheet in the workbook.

8. Add Multiple Sheets and use Names from a Range

The following code counts rows from the range A1:A7. After that, it loops to add sheets according to the count from the range and uses values from the range to name the sheet while adding it.

Sub AddSheetsExample9()

Dim sheets_count As Integer
Dim sheet_name As String
Dim i As Integer

sheet_count = Range("A1:A7").Rows.Count

For i = 1 To sheet_count
  sheet_name = Sheets("mySheet").Range("A1:A7").Cells(i, 1).Value
  Worksheets.Add().Name = sheet_name
Next i

End Sub

But with the above code, there could be a chance that the sheet name you want to add already exists or you have a blank cell in the name range.

In that case, you need to write a code that can verify if the sheet with the same name already exists or not and whether the cell from where you want to take the sheet name is blank or not.

If both conditions are fulfilled only then it should add a new sheet. Let me put it in steps two steps:

First, you need to write an Excel User Defined Function to check if a sheet with the same name already exists or not.

Function SheetCheck(sheet_name As String) As Boolean

Dim ws As Worksheet

SheetCheck = False
 
For Each ws In ThisWorkbook.Worksheets
 
    If ws.Name = sheet_name Then
    
        SheetCheck = True
        
    End If
 
Next
 
End Function

Second, you need to write a code using this function and that code should also check if the name cell is blank or not.

Sub AddMultipleSheet2()

Dim sheets_count As Integer
Dim sheet_name As String
Dim i As Integer

sheet_count = Range("A1:A7").Rows.Count

For i = 1 To sheet_count

    sheet_name = Sheets("mySheet").Range("A1:A10").Cells(i, 1).Value
    
    If SheetCheck(sheet_name) = False And sheet_name <> "" Then
    Worksheets.Add().Name = sheet_name
    End If

Next i

End Sub

Now in the above code, you have used the VBA IF Statement and in this statement, you have the sheet check function which checks for the sheet name and then you have a condition to check if the name cell has a blank value.

Sample File

• VBA Worksheet – Excel VBA Examples – VBA Tutorial