[RESOLVED] Deleting a Tab in Excel

[jeffcravener]

I can delete a sheet in Excel with code, but a popup comes up telling me that 'data' may be lost if the tab is deleted...

is there a way to delete the tab and avoid the popup?

Here is what I have:

With Sheets(i)
      .Select
      .Unprotect
      .Delete
End With

thanks in advance!

[RobDog888]

Private Sub Workbook_Open()
    'SUPPRESS ALERTS
    Application.DisplayAlerts = False
    With Sheets(i)
        .Select
        .Unprotect
        .Delete
    End With
    'RE-ENABLE ALERTS
    Application.DisplayAlerts = True
 
End Sub

[jeffcravener]

works perfectly!!

[RobDog888]

Your welcome.
HTH.