excel 一次性的删除数据区域内的所有空列的两种方法

办公教程导读

收集整理了【excel 一次性的删除数据区域内的所有空列的两种方法】办公软件教程，小编现在分享给大家，供广大互联网技能从业者学习和参考。文章包含916字，纯文字阅读大概需要2分钟。

办公教程内容图文

　　具体操作步骤如下：
　　第一步，在数据区域下的任意一行，比如A8单元格输入公式：=1/COUNTA(A1:A6)，然后向右填充复制到H8，得到计算结果，可以看到D、F两行空列都是错误公式。
　　第二步，单击任意数据区域的单元格，按下F5键，弹出“定位”对话框，单击“定位条件”，选择“公式”选项组下面的“错误”复选框，确定。就可以将所有错误公式的列选中。
　　第三步，单击“编辑”——“删除”——“整列”。
　　第四步，删除辅助行。

　　第二种一次性的删除数据区域内的所有空列的方法是使用VBA代码。
　　下面是编写的一段程序，只要运行这段程序，就可以迅速将所有空列删除。代码如下：
Sub DeleteEmptyColumns()
    Dim LastCol As Long, r As Long
    LastCol = ActiveSheet.UsedRange.Column – 1 + ActiveSheet.UsedRange.Columns.Count
    Application.ScreenUpdating = False
    For r = LastCol To 1 Step -1
        If Application.WorksheetFunction.CountA(Columns(r)) = 0 Then Columns(r).Delete
    Next r
    Application.ScreenUpdating = True
End Sub

办公教程总结

以上是为您收集整理的【excel 一次性的删除数据区域内的所有空列的两种方法】办公软件教程的全部内容，希望文章能够帮你了解办公软件教程excel 一次性的删除数据区域内的所有空列的两种方法。
如果觉得办公软件教程内容还不错，欢迎将网站推荐给好友。