Lucia,

Try

Application.DisplayAlerts = False
Sheets("Whatever").Delete
Application.DisplayAlerts = True


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com
(email on the web site)


"Lucia" wrote in message
...
Is there a way NOT to get the "Data may exist in the sheet(s) selection
for
deletion. To permanently delete the data, press delete" message when
deleting
a worksheet?

I put the code "Application.CutCopyMode = False", but it does not work.

Thanks