怎么判断Excel中的一整行是否为空，并删除

发布网友发布时间：2022-04-20 16:44

共2个回答

热心网友时间：2023-06-22 22:38

A1：E10这个区域，如果某行都为空，就删除该行
Sub 删除空白行()
Dim i
For i = 1 To 10
X = WorksheetFunction.CountIf(Range("A" & i, "e" & i), "<>")
If X = 0 Then
Rows(i).Select
Selection.Delete Shift:=xlUp
End If
Next
End Sub

热心网友时间：2023-06-22 22:38

选中该行，看一下下面有没有数值或求和数，就知道里面有没有数据了。按Delete键清空里面的数据。

声明：本网页内容为用户发布，旨在传播知识，不代表本网认同其观点，若有侵权等问题请及时与本网联系，我们将在第一时间删除处理。E-MAIL:11247931@qq.com