excel 删除空白列的三种方法,以及如何批量删除空行空列

详见:excel删除空白列的三种方法,以及如何批量删除空行空列
本人更倾向于第三种方法:
excel删除空白列方法三:

按ALT+F11,打开VBE编辑器,插入——模块,复制下面代码,然后按F5键,运行。

Sub 删除空列()
Dim i%, sh As Worksheet
For Each sh In Worksheets
For i = sh.UsedRange.Cells(sh.UsedRange.Cells.Count).Column To 1 Step -1
If sh.Cells(65536, i).End(xlUp).Row = 1 And sh.Cells(1, i).Text = "" Then sh.Columns(i).Delete
Next i
Next sh
End Sub

excel删除列还有一种情况是:把EXCEL里面的255列和65538行变成自己想要的只有10列10行的一个表。
  方法就是选中不需要的行、列,然后右键隐藏行列即可。

Excel批量删除空行空列的方法

Sub Del()
Dim irow%, icl%
Cells.UnMerge ''将合并单元格,分成独立的单元格
Application.ScreenUpdating = False '屏幕不刷新
For irow = [A65536].End(3).Row To 1 Step -1 '循环A列最后有数据的行数次,到第1止。
If Len(Cells(irow, 1)) = 0 Then Rows(irow).Delete '判断A列中的单元是否为空,则删除这一行
Next
For icl = Cells.Columns.Count To 1 Step -1
If Application.CountA(Columns(icl)) = 0 Then Columns(icl).Delete
Next
Application.ScreenUpdating = True
End Sub

Excel批量删除空行的方法

Excel批量删除大量空行的方法

  • 首先全选数据;第二,按F5键打开定位,点击定位条件按钮,选为空值;第三步、点击确定按钮此时,所有空值被选中; 第四步、在选中空值上点击右键,删除,表行。
  • 0
    点赞
  • 4
    收藏
    觉得还不错? 一键收藏
  • 0
    评论

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值