Deleting sheets

  • Thread starter Thread starter oldjay
  • Start date Start date
Try the below

Dim ws As Worksheet
Application.DisplayAlerts = False
For Each ws In Sheets
If ws.Name <> "Master" Then ws.Delete
Next
Application.DisplayAlerts = True
 
Thanks

Jacob Skaria said:
Try the below

Dim ws As Worksheet
Application.DisplayAlerts = False
For Each ws In Sheets
If ws.Name <> "Master" Then ws.Delete
Next
Application.DisplayAlerts = True
Click to expand...
 
Back
Top