如何将制定区域如（G2）单元格有数据的表单隐藏和打开

xwg123456.1 · 发表于 2020-3-6 16:16

求助：”如题，1将g2单元格中有数据的表单隐藏掉，不符合要求的的不动只匹配单元格，只要单元格中有数据就隐藏掉该表单
2同养遍历隐藏的表单，符合g2单元格有数据的表单取消隐藏“

图中sheets6 G2单元格中有测试字样，就需要隐藏

phsu · 发表于 2020-3-7 16:32

Sub test()
Dim Sht As Worksheet
For Each Sht In Worksheets
      If Sht.Range("G2") <> "" Then
         Sht.Visible = False
      Else
         Sht.Visible = True
      End If
Next
End Sub

xwg123456.1 · 发表于 2020-3-9 09:10

phsu 发表于 2020-3-7 16:32
Sub test()
Dim Sht As Worksheet
For Each Sht In Worksheets

谢谢老师
那这些已经隐藏的表格如何再一键打开

phsu · 发表于 2020-3-9 22:37

可用OnKey事件處理。

renkangjizhen · 发表于 2020-3-10 09:33

在工作表和工作部中各设一段代码

		自动登录	找回密码
密码			免费注册

[求助] 如何将制定区域如（G2）单元格有数据的表单隐藏和打开

最新热点 /1