vba - 根据另一个工作表中的单元格条件自动隐藏列

Question

我是 VBA 编码的新手，到目前为止，我已经成功地在工作簿中创建了一个范围表，该工作簿根据工作簿用户对是/否问题的回答来隐藏/取消隐藏选项卡。

我需要进一步完善工作簿，以便范围选项卡中提供的是/否响应导致 汽车 隐藏其他工作表中的列。使用此网站上的先前线程，我在其中一个选项卡上使用了此代码(显然已针对我自己的单元格引用进行了修改):

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Address = "$B$6" Then
        Select Case Target.Value
        Case Is = "Cast"
            Columns("f").EntireColumn.Hidden = False
            Columns("d").EntireColumn.Hidden = True
            Columns("e").EntireColumn.Hidden = True
        Case Is = "LDF"
            Columns("f").EntireColumn.Hidden = True
            Columns("d").EntireColumn.Hidden = False
            Columns("e").EntireColumn.Hidden = False
        Case Is = "Select ROV Type"
            Columns("f").EntireColumn.Hidden = False
            Columns("d").EntireColumn.Hidden = False
            Columns("e").EntireColumn.Hidden = False
        End Select

在 B6 中，我有一个公式 (=Name) 从范围选项卡中提取出来。虽然上面的代码有效，但它仅在我手动输入单元格以重新提取数据时才这样做......任何提示:
- 链接到我的宏中的原始范围选项卡，绕过单元格引用；和
- 自动化列隐藏？

Answer 1

最简单的做法似乎是在需要的地方像这样编辑您的代码:

Sheet2.Columns("f").EntireColumn.Hidden = False

Sheet2 是应该隐藏列的工作表。