J
joecrabtree
To all,
I have this code that deletes all but the active worksheets. This
deletes the sheets fine, but then returns the error:
Method 'Delete' of Object_ Worksheets Failed
Any ideas why this is happening?
The code is below:
Dim wks As Worksheet
Application.DisplayAlerts = False
For Each wks In Worksheets
If wks.Name <> ActiveSheet.Name Then wks.Delete
Next wks
Application.DisplayAlerts = True
Thanks in advance for your help,
Regards
Joseph Crabtree
I have this code that deletes all but the active worksheets. This
deletes the sheets fine, but then returns the error:
Method 'Delete' of Object_ Worksheets Failed
Any ideas why this is happening?
The code is below:
Dim wks As Worksheet
Application.DisplayAlerts = False
For Each wks In Worksheets
If wks.Name <> ActiveSheet.Name Then wks.Delete
Next wks
Application.DisplayAlerts = True
Thanks in advance for your help,
Regards
Joseph Crabtree