Excel - Delete A Worksheet With Name Error Handling

This macro deletes a worksheet with name and error handling.

Excel

2057
1639
0
0

Add to collection

1 Open MS Excel.

2 Create a blank workbook.

3 Go to Developer's tab > click on "Visual Basic" button or hit Alt + F11.

4 Go to Insert tab > click on "Module" or hit M.

5 Copy the VBA code from below.

6 Paste the code in the newly created module.

7 Go to Run tab > click on "Run Sub/UserForm" or hit F5.

8 That's it!

Code

'============================================
' Delete A Worksheet With Name Error Handling
'============================================
Sub deleteWorksheetWithNameErrorHandling()
    ' Set variables
    Dim ws As Worksheet
    ' Loop thru worksheets
    For Each ws In Worksheets
        ' Check worksheets count and name
        If Worksheets.Count > 1 And ws.Name = "Sheet2" Then
            ' Delete worksheet
            Worksheets("Sheet2").Delete
            ' Exit for loop
            Exit For
        End If
    Next ws
End Sub