In article , Rick Rothstein
writes
Try it this way...

Application.DisplayAlerts = False
ActiveWindow.SelectedSheets.Delete
Application.DisplayAlerts = True



Hi All

OK Thanks for the suggestions - that's fixed it. No more popup.

Thanks.