【VBA】Excelテーブルを初期化する

Public Sub InitTbl(ByVal ws As Worksheet)
    With ws.ListObjects(1)
        If Not .DataBodyRange Is Nothing Then .DataBodyRange.Delete
    End With
End Sub