excel批量删除空行的办法

文章来自:http://www.ittribalwo.com/show.asp?id=1502

从网上复制来的代码往往有很多空行,excel批量删除空行的方法有多种,视具体数据源不同,可以选择性的使用不同的方法。本文旨在对删除空行进行总结。

excel批量删除空行方法一:

方法是:选择包含需要删除的数据区域,比如A2:D10,然后按F5键,打开“定位”对话框,单击“定位条件”,打开“定位条件”对话框,选择“空值”,可以批量选择空行,然后单击右键,选择删除即可。

excel批量删除空行方法二:

我们可以在旁边的空白列输入1,然后下拉,作为辅助列。然后开启“筛选”,筛选“空白”,在筛选状态删除这些空白行,最后关闭筛选。

excel批量删除空行方法三:

如果工作表中有大量的空行,可以使用VBA代码实现。方法是:按ALT+F11,打开VBE编辑器,插入——模块,复制下面的代码,然后按F5键运行。

Sub 批量删除空行()
 Dim LastRow As Long
 Dim r As Long
 LastRow = ActiveSheet.UsedRange.Row - 1 + ActiveSheet.UsedRange.Rows.Count
 Application.ScreenUpdating = False
 For r = LastRow To 1 Step -1
 If Application.WorksheetFunction.CountA(Rows(r)) = 0 Then Rows(r).Delete
 Next r
 Application.ScreenUpdating = True
End Sub

发表评论

电子邮件地址不会被公开。 必填项已用*标注