Excel VBA中使用Range时，有一个EntireRow的属性，以Range单元格为基准选择整行。
1. 打开Visual Basic，添加模块和过程，称之为“单元格操作4”。
Sub 单元格操作4()
End Sub
2. 如图所示，选中A1单元格所在整行。
Sub 单元格操作4()
Range("A1").EntireRow.Select
End Sub
3. 同理，可以选中单元格所在行，也可以选中其所在列，把EntireRow改成EntireColumn即可。
Sub 单元格操作4()
Range("B5").EntireColumn.Select
End Sub
4. 如果要删除整行，把Select动作改成Delete即可，如图所示。
Sub 单元格操作4()
Range("B5").EntireRow.Delete
End Sub
5. 在实际案例中，如果遇到有空值的单元格，且要将其所在行或列的所有数据都清理掉，就可以用到EntireRow或EntireColumn属性。
6. 添加一个for each循环。
Sub 单元格操作4()
Dim rng As Range
For Each rng In Range("A1:D9")
Next
End Sub
7. 添加一个if判断，如果单元格为空值，则删除整行数据。
Sub 单元格操作4()
Dim rng As Range
For Each rng In Range("A1:D9")
If rng = "" Then
rng.EntireRow.Delete
End If
Next
End Sub
8. 执行以上代码后，即可得到清理数据后的表格。
以上示例只是用于演示，实际应用场景请根据自己的需要进行相应的设计或调整。
