循环以在单元格为空时清除行的内容

Question

第一天，新工作，不想在我接受的第一项任务中落在老板面前。我尝试了各种IF THEN，FOR＆amp; DO语句，但不能完全达到我需要的行为。

我有从A列到AH的数据。我想单击一个按钮，这将导致循环检查D列上每个单元格的内容，然后清除该行的内容，如果它回来为空。

Answer 1

Sub delDemptyrows()
Dim i&
For i = 1 To ActiveSheet.UsedRange.Rows.Count
    If Cells(i, 4).Value = vbNullString Then Cells(i, 4).EntireRow.ClearContents '4 = D column
Next
End Sub

未经测试，因此请在使用前进行备份。