Clear a sheet

Seek clean alternative to :

Public Sub ClearSheet(sheet As Worksheet)
sheet.Activate
Cells.Select
Selection.ClearContents
Selection.Clear
End Sub

Thanks.