Excel 如何快速删除空白行
发布时间：2023-12-10 01:08:35
Excel 中处理网络上或者第三方软件导出的数据时，经常遇到 Excel 文档行和行出现多余空白行的情况，这些多余的空白行会影响数据的直观且占用和浪费空间。怎么简单方便的删除这些空白行呢？肯定不能一行一行的删除，那样费时又费力，好，今天我么就给大家提供两种简变的方法(源数据如图)：
一、利用 Excel快速定位功能
1、选中需要删除空行的区域，点击 开始 标签 --> 编辑 组 --> 查找和选择 菜单 --> 定位条件... 菜单项 调出 定位条件 对话框，选择 空白 选项
2、右键单击任意一个定位中的整行都是空白的单元格，在弹出菜单中选择 删除 按钮
3、在弹出的删除对话框中选择 整行 选项，然后点击 确定 按钮即可
二、VBA 代码
打开 VBE 编辑器，新建一个标注模块，在模块中添加后面所列的代码，然后将光标定位到代码中，按 F5 键运行代码即可，代码如下：
Sub DeleteBlankRows()
Dim I As Long
Dim Rg As Range
Dim xCalculation As XlCalculation
Dim xScreenUpdating As Boolean
xCalculation = Application.Calculation
xScreenUpdating = Application.ScreenUpdating
Application.Calculation = xlCalculationManual
Application.ScreenUpdating = False
Set Rg = ThisWorkbook.ActiveSheet.UsedRange
For I = Rg.Rows.Count To 1 Step -1
If WorksheetFunction.CountA(Rg.Rows(I)) = 0 Then
Rg.Rows(I).EntireRow.Delete
End If
Next I
Application.Calculation = xCalculation
Application.ScreenUpdating = xScreenUpdating
End Sub
Excel 如何快速删除空白行的下载地址：
0
投稿猜你喜欢
- winvnc.exe进程简介进程文件： winvnc or winvnc.exe 进程名称： VNC-Server 进程类别：存在安全风险的
很多的用户们在使用135编辑器的时候，在编辑完成，将图文转到微信公众号的时候，会感觉很麻烦，不清楚需要如何处理，那就快来看看详细的教程吧~1- 更新完KB4041691补丁，在安装的时候提示失败，并且显示0x80070002错误的问题，win10更新KB4041691补丁失败怎么解决
- win10开机pin密码怎么取消？在win10系统中，新增了一个PIN码登录的安全设置，进一步的提高用户使用系统的安全性，但是设置好了之后想
- 迅雷是我们的日常生活中经常使用的视频播放软件之一，你知道迅雷中怎么上传小视频的吗？接下来我们一起往下看看迅雷中上传小视频的方法吧。方法步骤1
- 最近有Win7系统用户反映，使用电脑过程中，屏幕总是会显示brightness，而且还一直闪出1024*768字样，用户不知道这是怎么回事，
- 2021年苹果推出了很多新产品，当然有新产品有旧产品，也将很多产品停止，这里为大家介绍一下。HomePodHomePod 于 2018 年推
- 最近有WinXP用户朋友们遇到更新显卡驱动后显卡出现花屏的情况，这是一种比较常见的电脑故障。那么该如何解决呢？下面小编就给大家带来解决方法，
- 最近在 Windows 10 资源管理器中，对文件进行拖放操作时，发生了闪退现象，即我将文件夹A的某个文件，拖放到左侧列表中文件夹B时，会发
- 当您尝试执行不允许的操作，或者 Mac 需要您的输入或更多信息，则屏幕上会出现提醒信息并播放提醒音。您可以更改提醒音并设定其音量。那么该如何
- 有时候因为情况要求，我们要在电脑上分别安装wps和office两个软件。有的小伙伴不知道这两个软件在电脑上是不是兼容、能不能共存。对于这个问
- Win7系统使用电脑时出现域名解析错误105怎么办？我们在使用电脑的时候经常会遇到各式各样的网络问题，其中就有域名解析错误105这个问题，那
- 我们使用UC浏览器上网，有时经常会输入各种账户密码，并将它们保存在UC浏览器中，以方便我们下次登入网页时浏览器就能自动帮助我们登入账号，那么
- win10投影如何设置？win10系统下的投影仪是我们经常会使用的东西，但是在使用的时候难免会遇见一些问题，因为要投影到各种仪器上，所以比较
- 在TH2之后，Windows 10的下一个重磅更新应该就是RedStone，据说它很快就要跟Insider会员见面了。俄罗斯大神WZor今天
- 说明ERFC.PRECISE 函数返回从指定下限值到无穷大积分的互补 ERF 函数。返回值互补ERF 函数。语法=ERFC.PRECISE(
- Sketch怎么自定义工具栏？Sketch软件想要自定义工具栏，怎么设置呢？下面我们就来看看Sketch自定义工具栏的技巧，需要的朋友可以参
- 怎样给wps文档加密呢?该怎样保护文档的资料不被修改呢?下面是小编为大家整理的wps表格设置密码的技巧，希望大家能够从中有所收获!wps表格
- win10任务栏出现显示不全，让你会很懵，不明白这到底是怎么造成的。其实一般情况下是屏幕设置的的原因，解决方法非常简单，只要修改一次100分
- 自动修复是Windows系统上的一项功能，可以帮助分析阻止您的设备正常启动的问题。但是有用户升级到最新的Win11系统之后，出现了卡在自动修
