Hi Paul

This will work, there is no need to select the sheet first.

Sub tt()
Application.DisplayAlerts = False
Sheets("ABC").Delete
Application.DisplayAlerts = True
End Sub

Regards
Andrew Bourke


ªü¤T wrote:
but want to ignore the warning message, please advise what should I
add at the end of the following command? thanks

e.g.
Sheets("ABC").Select
Sheets("ABC").Delete

Paul