Reset excel sheet (Clean completely)

Help Activities
, , , ,
2

just delete the sheet and recreate it is that ok?

    Application.DisplayAlerts = False
    Sheets("Sheet1").Delete
    Dim newSheet As Worksheet
    Set newSheet = ActiveWorkbook.Sheets.Add
    newSheet.Name = "Sheet1"