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

excel删除空白列方法一：　　excel只能筛选行，不能筛选列。如果要批量删除空白列，可以复制所有数据，在目标单元格，选择性粘贴——转置，然后在任意列筛选所有空白行。最后再将所有数据转置回来。excel删除空白列方法二：　　选取所有数据，按F5键，打开“定位”对话框，勾选“空值”，然后单击开始——单元格——删除——删除工作表列。（此方法适用于，数据列没有空单元格，只有整列为空列的情况下使用）。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