Wanted to delete all other worksheets in a single click? You can do that using Macros in Excel!
Make sure your Excel has the Developer Tab enabled following this tutorial.
I explain how you can do this below step by step!
What does it do?
Deletes all other worksheets except the active worksheet
Copy Source Code:
Sub DeleteAllOtherWorksheets() Dim worksheet As Worksheet 'Loop through the worksheets For Each worksheet In ThisWorkbook.Worksheets 'Delete the sheet if it's not the active sheet If worksheet.name <> ThisWorkbook.ActiveSheet.name Then Application.DisplayAlerts = False worksheet.Delete Application.DisplayAlerts = True End If Next worksheet End Sub
Final Result:Â
Exercise Workbook:
These are the worksheets in the file:
STEP 1: Go to Developer > Code > Visual Basic
STEP 2: Paste in your code and Select Save. Close the window afterwards.
STEP 3:Â Let us test it out!
Select the worksheet that you do not want to be deleted. Go to Developer > Code > Macros
Make sure your macro is selected. Click Run.
With just one click, all of the other worksheets are now deleted!
Â
How to Delete All Other Worksheets Using Macros In Excel