嘻皮客娱乐学习网

标题: 快速删除Exce工作表中包含空白单元格的行 [打印本页]

作者: summer 时间: 2017-1-16 17:27
标题: 快速删除Exce工作表中包含空白单元格的行

在Exce工作表中，经常会遇到数据区域中存在空白单元格的情况。在对这样的工作表进行编辑处理时，有时需要将包含这种空白单元格的行删除掉。对于包含大量数据的工作表，使用VBA程序来完成这种删除操作是一种快捷的方法。本文介绍快速删除Exce工作表中包含空白单元格的行的方法。
1、启动Excel并打开工作表，在该工作表的数据区域中存在空白单元格，如图1所示。在Visual Basic编辑器的工程资源管理器中插入一个模块，在模块的“代码”窗口中输入如下程序代码：
Sub DeleteRow()
Dim n,i As Integer
For n=1 To 7
For i=1 To 20
Cells(i,n).SpecialCells(xlCellTypeBlanks).EntireRow.Delete
Next
Next
End Sub

(, 下载次数: 103)

图1　数据区域存在空白单元格

2、按F5键运行程序，切换到Excel工作表，数据区域中空白单元格所在的行被删除，如图2所示。

(, 下载次数: 93)

图2　数据区域中空白单元格所在的行被删除

欢迎光临嘻皮客娱乐学习网 (http://www.xipick.com/)