想偷看我的Excel表格？没门！

总担心别人偷偷打开你的Excel表格？兰色今天教你一招。

兰色刚做的一个表格，看上去只有一个工作表（右键菜单中取消隐藏是灰色的）

真的只有一个？当然不是！

当在单元格A1中输入数字1的时候，突然蹦出多个工作表。当删除A1内容时，所有工作表又不见了。

你关闭此Excel文件时把A1值清空，工作表会自动“深度隐藏”，当别人打开此文件时，只能看到“开始”工作表。

看上去很神奇的功能，制作起来其实很简单，只需几句简单的VBA代码。

---

Private Sub Worksheet_Change(ByVal Target As Range)

If Target.Address = '$A$1' Then

    For x = 2 To Sheets.Count

      If Target = 1 Then

        Sheets(x).Visible = -1

      Else

       Sheets(x).Visible = 2

      End If

    Next x

End If

End Sub

---

复制上面的代码（$A$1可以修改为自定义位置 ），在你的Excel文件中，右键单击“唯一不隐藏的工作表”（本例是“开始”）

注：万一你操作失败又不知如何取消工作表隐藏，可以在打开的代码窗口中，手工逐个选取工作表名称，在下面属性窗口中找到visible ，后面的值2修改为-1即可。

不想要这个功能？工作表右键 - 查看代码，把右侧粘贴的代码删除即可。（不会影响你的工作表数据）

兰色说：当然这种隐藏功能对Excel高手来说是无效的，但对于99%的Excel用户，还是有一定保护作用。