Excelmacros – 删除条件下拉列表中的值

好的，我有一个macros分配给一个button来隐藏一个标签，取决于下拉列表的值。

Sub Hide_Tabs() ' Hide unused Tabs If Sheet4.Range("G2") = Sheet13.Range("B154") Then Sheet5.Visible = False Else Sheet16.Visible = False End If End Sub 

在我所有的testing中都能正常工作，而且如果单元格B8的值发生变化，我也有一个分配给工作表（而不是模块）的macros来删除单元格下方的值，我使用它作为条件下拉列表。 （例如，Cel B8具有砖的types列表，并且B9具有取决于砖的types的可用颜色的列表）

 Private Sub Worksheet_Change(ByVal Target As Range) On Error Resume Next 'Call dropdowns on column 2 (B) Row 8 If Target.Column = 2 And Target.Row = 8 Then If Target.Validation.Type = 3 Then Application.EnableEvents = False 'clear content on cell 1 bellow of dropdown Target.Offset(1, 0).ClearContents End If End If exitHandler: Application.EnableEvents = True Exit Sub End Sub 

无论如何..工作得很好..现在我试图得到第一个macros的结果，第二个macros的工作方式放置在工作表4的代码，2不同的选项卡应根据cel G2的值隐藏，我到目前为止：

 Private Sub Hide_Tiling(ByVal Target As Range) On Error Resume Next 'if dropdown on Shee4 G2 value = Sheet13 B154, hide Sheet5. 'if not, hide Sheet6 If Target.Column = 7 And Target.Row = 2 Then If Sheet4.Range("G2") = Sheet13.Range("B154") Then Application.EnableEvents = False Sheet5.Visible = False Else Sheet16.Visible = False End If End If exitHandler: Application.EnableEvents = True Exit Sub End Sub 

它不会返回错误，也没有任何东西:)我缺less什么？

单元格G2和H2合并是否重要？ 我也试图解开他们，因此只指向单元格G2 ans仍然没有…

谢谢