EXCEL2010中用VBA为什么删除空单元格删不干净(连续的空单元格只删除第一个)
Subtest1()'如果A列上有Ai单元为空,则删除i行ForEachcellInRange("A1:A1000")IfIsEmpty([cell])ThenRows(...
Sub test1()
'如果A列上有Ai单元为空,则删除i行
For Each cell In Range("A1:A1000")
If IsEmpty([cell]) Then
Rows(cell.Row).Select
Selection.Delete Shift:=xlUp
End If
Next cell
End Sub 展开
'如果A列上有Ai单元为空,则删除i行
For Each cell In Range("A1:A1000")
If IsEmpty([cell]) Then
Rows(cell.Row).Select
Selection.Delete Shift:=xlUp
End If
Next cell
End Sub 展开
1个回答
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询