如何在Excel中自动隐藏列中包含空白单元格的行？

如果您的Excel数据集中某列包含空白单元格，您可能希望自动隐藏该列中包含空白单元格的行。本指南将向您展示如何使用简单的VBA代码自动隐藏包含空白单元格的行，从而更轻松地管理数据，无需手动筛选或隐藏行。

使用VBA代码自动隐藏列中包含空白单元格的行

使用VBA代码自动隐藏列中包含空白单元格的行

以下代码可以帮助您一次性隐藏指定列中所有包含空白单元格的行。如果您删除该列中某个单元格的内容，对应的行也会自动隐藏。请按照以下步骤操作：

1. 右键单击要自动隐藏包含空白单元格行的工作表标签，然后从上下文菜单中选择“查看代码”。在弹出的“Microsoft Visual Basic for Applications”窗口中，将以下代码复制并粘贴到空白的“模块”中：

VBA代码：如果列中包含空白单元格则自动隐藏行：

Private Sub Worksheet_Change(ByVal Target As Range)
'Updateby Extendoffice
    Dim xRg As Range
    Application.ScreenUpdating = False
        For Each xRg In Range("A1:A20")
            If xRg.Value = "" Then
                xRg.EntireRow.Hidden = True
        
            Else
                xRg.EntireRow.Hidden = False
            End If
        Next xRg
    Application.ScreenUpdating = True
End Sub

注意：上述代码中的“A1:A20”是包含您希望自动隐藏的空白单元格的数据区域。

2. 现在返回工作表。当您双击任意单元格并按下“Enter”键时，A列中包含空白单元格的行将立即被隐藏。此外，如果您清除A列指定区域中任何单元格的内容，对应的行也会自动隐藏。