为什么不删除每一行？

Question

我找到了一个解决方法代码，用于通过过滤和删除尝试做的事情，但为了更好地了解我在VBA中缺乏知识，我想了解为什么这个宏无法按照我的意图工作。

这个例子;我想识别以“HH G”开头的列的值并删除整行数据。 我想出的宏确实可以工作，但我必须手动重复它，因为它一次只能删除几行。

Sub test()
Dim c As Range

For Each c In Range("Table19").Columns(5).Cells
If Left(c, 4) = "HH G" Then c.EntireRow.Delete
Next

End Sub

非常感谢。