从列表框中选择值时无法自动运行vba

Question

我使用数据验证创建了一个列表框，并将值放在1,2中。我的期望是，每当我从列表框中选择1时，4到8的行应该隐藏，当我选择2时，它应该从第5行到第8行隐藏。

这种情况正在发生，但每次我必须转到开发人员选项卡并选择“宏”选项并选择隐藏选项并运行它来完成工作。我的期望是，只要我从列表框中选择值，宏就应该运行。

我正在使用excel 2010.我的代码如下：

Sub hide()
If Range("A1").Value = 1 Then
Range("4:8").EntireRow.Hidden = True
ElseIf Range("A1").Value = 2 Then
Range("4:8").EntireRow.Hidden = Fase
Range("5:8").EntireRow.Hidden = True
End If
End Sub

Answer 1

右键单击列表框，然后选择＆＃34; 指定宏＆＃34;

在新的＆＃34;分配宏＆＃34;窗口，查找您的宏隐藏，选择它并点击确定。

这应该将您的宏分配到列表框。

Answer 2

使用“数据验证”选项卡创建列表框。我的期望是，只要从列表框中选择任何值，行就应该隐藏。

此致 Tuhin。