Hi Charles,

You can suppress the message by wrapping the line to delete the sheet in
these statements, as follows:

Application.DisplayAlerts = False
'delete sheet
Application.DisplayAlerts = True

Regards,
GS