如何在Excel中刪除Sheet時, 不會有dialog詢問回應...(編號：6481)

我在VB程式中想要刪除多餘的Sheet, 但執行過程中,
會出現訊息詢問是否確定要刪除,
要如何免去這詢問直接刪除呢...
我的程式碼如下:(是否要加些參數???)
Sheets("Sample").Select　　　　　　　
　 ActiveWindow.SelectedSheets.delete