Question

晚安，

我正在尝试通过让activex组合框消失而在创建图表时不需要减少混淆来提高工作簿的可用性。问题是，一旦它消失，它就永远不会回来。我需要在代码中添加更多内容吗？这实际上只是删除了我的组合框吗？

Private Sub Worksheet_Change(ByVal Target As Range)
    Application.ScreenUpdating = False
    If Cells(1, 1).Value > "0" Then
        Me.ComboBox2.Visible = True
    Else
        Me.ComboBox2.Visible = False
    End If
    Application.ScreenUpdating = True
End Sub

提前致谢！

Answer 1

我认为你必须删除0

周围的双引号

此外，您的代码可以简化为：

Private Sub Worksheet_Change(ByVal Target As range)
    Me.ComboBox2.Visible = Cells(1, 1).value > 0
End Sub

ComboBox消失，永远不会回来

1 个答案: