Slet akr uden at skulle bekræfte ønsket om at slette

Hejsa
Hvordan undgår jeg, at brugeren skal bekræfte at et ark må slettes. Jeg bruger følgende rutine

Sub cleanup_worksheet_Ny_data()
    Set NewSheet = Sheets.Add(Type:=xlWorksheet)
    sh = ActiveSheet.Name
    Sheets(sh).Move After:=Sheets("udskrift")
    Sheets("Ny_data").Delete
    Sheets(sh).Name = "Ny_data"
End Sub

men når Sheets("Ny_data").Delete afvikles, så skal jeg bekræfte i en dialogboks at arket må slettes. Kan denne boks undgås?