KutoolsforOffice — 一套方案，五大工具。事半功倍。

如何在 Excel 中一次性隐藏多个空白的行或列？

作者Xiaoyang修改日期

Excel 工作表中常含有空白行或列，不仅干扰数据处理，还会降低可读性。隐藏这些空白行或列，能显著提升数据的可视性与呈现效果。本指南为您介绍多种快速高效隐藏多个空白行或列的方法。

使用 VBA 代码隐藏多个空白行或列

使用 KUTOOLS AI 隐藏多个空白行或列

使用 Kutools for Excel 删除多个空白行或列

使用 VBA 代码快速隐藏多个空白行或列

以下 VBA 代码可助您快速、轻松地在工作表中隐藏多个空白行或列。

1. 按住“Alt”+“F11”键，即可打开“Microsoft Visual Basic for Applications”窗口。

2. 单击“插入”>“模块”，并将以下代码粘贴到弹出的“模块”窗口中。

VBA 代码：隐藏工作表中的多个空白行

Sub HideEmpties()
'Updateby Extendoffice
    Dim xRg As Range
    Dim xTxt As String
    Dim xCell As Range
    Dim I As Long
    On Error Resume Next
    If ActiveWindow.RangeSelection.Count > 1 Then
      xTxt = ActiveWindow.RangeSelection.AddressLocal
    Else
      xTxt = ActiveSheet.UsedRange.AddressLocal
    End If
    Set xRg = Application.InputBox("Please select the data range:", "Kutools for Excel", xTxt, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    On Error Resume Next
    For I = 1 To xRg.Row + xRg.Rows.Count
        If Application.WorksheetFunction.CountA(xRg.Rows(I)) = 0 Then
            xRg.Rows(I).EntireRow.Hidden = True
        End If
    Next
End Sub

3. 然后按下“F5”键运行此代码，系统将弹出提示框，提醒您选择要隐藏空白行的数据区域，如下图所示：

用于选择数据区域的 VBA 代码

4. 然后点击“确定”按钮，所选的空白行将立即被隐藏，如下图所示：

空白行一次性被隐藏

注意：若要隐藏多个空白列，请使用以下 VBA 代码：

VBA 代码：隐藏工作表中的多个空白列

Sub HideEmpties()
'Updateby Extendoffice
    Dim xRg As Range
    Dim xTxt As String
    Dim xCell As Range
    Dim I As Long
    On Error Resume Next
    If ActiveWindow.RangeSelection.Count > 1 Then
      xTxt = ActiveWindow.RangeSelection.AddressLocal
    Else
      xTxt = ActiveSheet.UsedRange.AddressLocal
    End If
    Set xRg = Application.InputBox("Please select the data range:", "Kutools for Excel", xTxt, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    On Error Resume Next
    For I = 1 To xRg.Column + xRg.Columns.Count
        If Application.WorksheetFunction.CountA(xRg.Columns(I)) = 0 Then
            xRg.Columns(I).EntireColumn.Hidden = True
        End If
    Next
End Sub

使用 KUTOOLS AI 隐藏多个空白行或列

如果您希望获得更快捷、更自动化的解决方案，“Kutools for Excel”为此任务提供了高效便捷的工具。借助其 KUTOOLS AI 助手，您只需用自然语言描述需求，KUTOOLS AI 便会自动为您完成后续操作。

Kutools for Excel 提供 300 多项高级功能，简化复杂任务，提升创造力与效率。集成 AI 能力，Kutools 精准自动化任务，让数据管理变得轻松自如。Kutools for Excel 的详细信息……         免费试用……

安装 Kutools for Excel 后，请单击“Kutools”>“AI 助手”，即可打开“KUTOOLS AI 助手”窗格。在该窗格中，请按以下步骤操作：

  1. 请选择您要使用的数据区域。
  2. 然后，在聊天框中输入需求，例如：
    “隐藏空白行”：隐藏选区中的多个空白行
    “隐藏空白列”：隐藏选区中的多个空白列
  3. 然后，按下“Enter”键或单击“发送”按钮。KUTOOLS AI 将分析您的问题，分析完成后，请单击“执行”按钮以获取结果。

使用 Kutools for Excel 删除多个空白行或列

本节将为您介绍如何快速删除范围、工作表或工作簿中多余的空白行或列。“Kutools for Excel”的“删除隐藏行/列”功能助您高效完成此操作。

Kutools for Excel 提供 300 多项高级功能，简化复杂任务，提升创造力与效率。集成 AI 能力，Kutools 精准自动化任务，让数据管理变得轻松自如。Kutools for Excel 的详细信息……         免费试用……

安装 Kutools for Excel 后，请按以下步骤操作：

1. 选择要删除空白行或列的数据区域，然后点击“Kutools”>“删除”>“删除隐藏行/列”，如下图所示：

点击 Kutools 的“删除隐藏（可见）行和列”功能

2. 在 “删除隐藏行/列”对话框中，从“查找范围”下拉列表选择“选择区域”（您也可根据需要选择该下拉列表中的其他选项），在“删除类型”部分选择“行”或“列”，并在“详细类型”部分选择“空白行”或“空白列”，如下图所示：

在对话框中指定选项

3. 然后单击“确定”按钮，所选内容中的空白行或列将立即被删除，如下图所示：

所选区域中的空白行或列已被移除

注意：使用此功能，您还可根据需要删除所选区域、工作表或工作簿中的隐藏行/列或可见行/列。

结论

如果您希望自动隐藏空白行或列，可以使用 VBA 代码，它能根据预设规则快速筛选并隐藏空行和空列。对于不熟悉 VBA 的用户，Kutools for Excel 提供了更直观的解决方案，让您无需编写任何代码，即可一键隐藏或删除空白行和列，轻松提升工作效率。根据具体需求选择合适的方法，可显著优化 Excel 表格管理，大幅提高数据处理效率。如果您有兴趣探索更多 Excel 技巧，我们的网站提供数千篇实用教程，助您轻松精通 Excel。

最佳办公效率工具

🤖KUTOOLS AI 助手：基于以下内容革新数据分析：智能执行   |  生成代码|  创建自定义公式  |  数据分析及生成图表|  调用 Kutools Functions……
热门功能：查找、高亮或标记重复项   |  删除空白行   |  合并列或单元格且不丢失数据   |  不使用公式的四舍五入……
高级 LOOKUP：多条件 VLookup  |  多值 VLookup  |   跨多工作表 VLookup   |   模糊查找……
高级下拉列表：快速创建下拉列表   |  级联下拉列表   |  多选下拉列表……
列管理器：添加指定数量的列|移动列|切换隐藏列的可见性状态|比较区域与列……
特色功能：网格聚焦   |  设计视图   |增强编辑栏   | 工作簿和表管理器   |  资源库（自动文本）|  日期提取   |  汇总工作表  |  加密/解密单元格   | 按列表发送邮件   |  超级筛选   |   特殊筛选（筛选粗体单元格/斜体/删除线……） ......
精选 15 工具集：12 文本工具（添加文本，删除特定字符，……）|   50+ 图表 类型（甘特图，……）|   40+ 实用公式（基于生日计算年龄，……）|   19 插入工具（插入二维码，从路径插入图片，……）|   12 转换工具（小写金额转大写，汇率转换，……）|   7 合并和拆分工具（高级合并行，分割单元格，……）|……更多
在您的首选语言中使用 Kutools – 支持英语、西班牙语、德语、法语、中文及 40+ 种其他语言！

使用 Kutools for Excel 大幅提升您的 Excel 技能，体验前所未有的高效。Kutools for Excel 提供 300 多项高级功能，助您提升生产力、节省时间。立即点击此处，获取您最需要的功能……

Office Tab 为 Office 带来标签式界面，让您的工作更轻松

  • 在 Word、Excel、PowerPoint、Publisher、Access、Visio 和 Project 中启用标签式编辑和阅读。
  • 在同一个窗口的新标签页中打开并创建多个文档，而非在新窗口中。
  • 将您的工作效率提升 50%，每天减少数百次鼠标点击！

所有 Kutools 插件，一个安装程序

Kutools for Office 套件捆绑了适用于 Excel、Word、Outlook 和 PowerPoint 的插件以及 Office Tab Pro，非常适合需要跨多个 Office 应用高效协作的团队。

ExcelWordOutlookTabsPowerPoint
  • 一体化套件— Excel、Word、Outlook 和 PowerPoint 插件 + Office Tab Pro
  • 一个安装程序，一个许可证— 几分钟内完成设置（支持 MSI）
  • 协同效果更佳— 在多个 Office 应用中实现高效协同
  • 30 天全功能试用— 无需注册，无需信用卡
  • 超值之选— 比单独购买插件更省钱