[算表] Excel VBA 限制了"复原"的动作

楼主: tuy (tuy)   2014-12-03 21:13:21
软件:Office
版本:2007
想要某一格(例如:H5)数字变动的时候,某些字段可以自动隐藏
从网络上看到了一个宏的写法,但是使用之后“复原”(回上一步)的动作就被限制了
请问该如何修改呢? 感谢
宏写法如下:
Private Sub OptionButton1_Click()
End Sub
Private Sub worksheet_change(ByVal Target As Range)
If [H5].Value = 6 Then
Columns("L:Y").Hidden = True
ElseIf [H5].Value = 10 Then
Columns("F:Y").Hidden = False
Columns("P:Y").Hidden = True
Else
Columns("F:Y").Hidden = False
End If
End Sub
作者: soyoso (我是耀宗)   2014-12-03 21:21:00
上面的if...end it外面在多包个 if not intersect([H5],target) is nothing then抱歉回文第一列end it打错,应为end ifhttp://goo.gl/p4iAMQ
楼主: tuy (tuy)   2014-12-03 21:31:00
太感谢so大了,好厉害唷 ^^

Links booklink

Contact Us: admin [ a t ] ucptt.com