Macro to Delete Sheets in Excel


Delete the Worksheet, Sheet1


Sub DeleteSheet()
Sheets("Sheet1").Delete
End Sub

Delete Worksheet based on user input


Sub DeleteSheetUserInput()
Dim x As String
x = InputBox("Enter the name of the sheet to be deleted")
MsgBox x
Sheets(x).Delete
End Sub

Download Excel file containing different Macros (2) to Add Multiple Sheets



How to use codes shared here?

Leave a Reply

Your email address will not be published.Required fields are marked *

This site uses Akismet to reduce spam. Learn how your comment data is processed.