如何在表1某单元格通过VBA控制表2是否隐藏

kexi1982

我想求一个代码就是关于隐藏表格的，比如说在表1的A3单元格，我选择是，表2就不隐藏，如果在A3选择否，表2就被隐藏起来了，我想问一下。谢谢。

山菊花

把代码添加到表1模块中：

1. Private Sub Worksheet_Change(ByVal Target As Range)
   
2.     If Target.Address <> "$A$3" Then Exit Sub
   
3.     Sheets("表2").Visible = (Target.Value = "是")
   
4. End Sub

复制代码

kexi1982

山菊花 发表于 2015-7-30 15:36
把代码添加到表1模块中：

受教了。谢谢。