根据值选择某些列

Question

我创建了一个包含所有询问的电子表格。

我想选择所有列，例如“B”。我的主要目的是快速查看所有已预订的人员。然后，如果我想查看所有查询，我可以只选择“E”列，然后它将隐藏我的所有取消和预订。

Answer 1

我理解您希望隐藏第一个单元格不包含“E”或“B”的所有列。这需要 VBA 宏。

第一步是保存电子表格以.xlsm允许 VBA 宏，然后使用 Excel 打开它。

键入Alt+F11打开 VBA 编辑器。右键单击“Sheetl (Sheetl)”或“ThisWorkbook”，然后选择 插入 > 模块。

在编辑器中复制粘贴以下文本：

Sub Hide_Columns_Not_A()
Dim c As Range
For Each c In Range("A1:E1").Cells
    If c.Value <> "A" Then
        c.EntireColumn.Hidden = True
    Else
        c.EntireColumn.Hidden = False
    End If
Next c
End Sub

Sub Hide_Columns_Not_E()
Dim c As Range
For Each c In Range("A1:E1").Cells
    If c.Value <> "E" Then
        c.EntireColumn.Hidden = True
    Else
        c.EntireColumn.Hidden = False
    End If
Next c
End Sub

Sub Unhide_All_Columns()
Dim c As Range
For Each c In Range("A1:E1").Cells
    c.EntireColumn.Hidden = False
Next c
End Sub

重要的：将上面文字中所有三次出现的 更改A1:E1 为真实范围，在您的情况下似乎至少为A1:U1。

然后按Ctrl+S保存电子表格，然后按 Alt+Q关闭 VBA 编辑器并返回 Excel。

从现在起，您可以前往开发人员窗格中，单击宏这将显示三个已定义的宏，选择所需的宏并单击 跑步。