vba - 空行の削除 - VBA を使用した MS Excel

Question

次の VBA を使用して、列 T に * がないすべての行を削除しています。機能しますが、一度に 1 行しか削除されません。列 T に * が含まれていない 25 行を削除するには、vba を 25 回実行する必要があります。コードに何か問題がありますか?

Sub DeleteCells()

    'Loop through cells A1:A10 and delete cells that contain an "x."
    For Each c In Range("t1:t35")
        If c <> "*" Then c.EntireRow.Delete
    Next

End Sub