如何根据Excel中的下拉列表选择隐藏或取消隐藏列？

在使用Excel时，您可以根据下拉列表的选择来隐藏或取消隐藏特定的列。例如，如果在下拉列表中选择“否”，C到I列将被隐藏；如果选择“是”，隐藏的C到I列将重新显示。请参见下面的截图。在本文中，我们将向您展示一种VBA方法，根据Excel中的下拉列表选择来隐藏或取消隐藏列。

根据下拉列表选择隐藏或取消隐藏Excel中的列

根据下拉列表选择隐藏或取消隐藏Excel中的列

如上例所述，要根据下拉列表选择隐藏或取消隐藏C到I列，请按照以下步骤操作。

1. 首先，创建一个包含“是”和“否”的下拉列表。

2. 然后按 Alt + F11 打开 Microsoft Visual Basic for Application 窗口。

3. 在 VBAProject 部分双击当前打开的工作表名称以打开代码编辑器。

4. 然后复制并将以下VBA代码粘贴到代码编辑器中。

VBA代码：根据下拉列表选择隐藏或取消隐藏列

Private Sub Worksheet_Change(ByVal Target As Range)
'Updated by Extendoffice 20180822
    If Target.Column = 2 And Target.Row = 3 Then
        If Target.Value = "No" Then
            Application.Columns("C:I").Select
            Application.Selection.EntireColumn.Hidden = True
        ElseIf Target.Value = "Yes" Then
            Application.Columns("C:I").Select
            Application.Selection.EntireColumn.Hidden = False
        End If
    End If
End Sub

注意：在上述代码中，Column = 2 和 Row = 3 是下拉列表的单元格引用，范围 C:I 是您希望隐藏或取消隐藏的列，请根据需要进行更改。

5. 同时按下 Alt + Q 键退出 Microsoft Visual Basic for Application 窗口。

从现在开始，当您在下拉列表中选择“否”时，所有指定的列都会被隐藏。

但是，如果您在下拉列表中选择“是”，所有隐藏的列会立即显示出来。

使用 Kutools AI 解锁 Excel 魔法

• 智能执行：执行单元格操作、分析数据和创建图表——所有这些都由简单命令驱动。
• 自定义公式：生成量身定制的公式，优化您的工作流程。
• VBA 编码：轻松编写和实现 VBA 代码。
• 公式解释：轻松理解复杂公式。
• 文本翻译：打破电子表格中的语言障碍。

通过人工智能驱动的工具增强您的 Excel 能力。立即下载，体验前所未有的高效！

相关文章：

• 如何在Excel下拉列表中选择值时自动填充其他单元格？
• 如何在Excel下拉列表中键入时自动完成？
• 如何在Excel中创建下拉日历列表？
• 如何在Excel中创建可搜索的下拉列表？
• 如何在Excel中创建支持多选或多个值的下拉列表？