神奇的“宏”：设置查看excel表格的权限

       前言： 宏对于熟悉VBA编程的同学已不陌生，而很多新手称VBA是“宏”，对它却敬而远之，一方面认为“宏”太高深根本学不会，另一方面也不知道宏到底有啥用。为了提高大家学习VBA的兴趣，兰色幻想教大家设置几个“宏”的应用实例，来看看宏能给我们带来什么？

   神奇的“宏”系列1：设置查看表格的权限

   例：如下图所示，如果在“主界面”工作表A1单元格中输入1，则可以查看'价格表'工作表，如果为空或其他内容则不能查看“价格表”

   设置步骤：

    步骤1：按alt+f11,打开visual basic界面。双击左上角工程窗口的'价格表'项，在右侧会出现一个空白的窗口(代码窗口)

    步骤2：在代码窗口中左上角下拉列表中，选取'worksheet'，这时在代码窗口中会自动出现以下代码，这个不是我们要的，但先不要删除。

    步骤3：在代码窗口右上角选“Activate”，代码窗口又会自动出现两行代码，然后我们把需要的代码写进去，就完成了我们的设置。

    代码：

Private Sub Worksheet_Activate()
  If Sheets('主界面').[a1] <> 1 Then
     Sheets('主界面').Select
  End If
End Sub

代码说明：

    If Sheets('主界面').[a1] <> 1 Then 判断主界面工作表中A1的值

    Sheets('主界面').[a1] 工作表“主界面”的A1单元格

    Sheets('主界面').Select 选取工作表“主界面”

    End if 和前面的IF对应，是结果句

   代码窗口如下图所示。

   步骤4：关闭visual basic窗口，然后试着点击“价格表”，你会发现会马上转向“主界面”工作表，我们并不能对“价格表”进行操作。（如果一眼也不想让看到价格表，就在价格表上盖一个图片或把A列拉一页宽）

   兰色说：VBA和宏其实并不一个概念，今天举一个小例了也只是VBA的一个很小的应用。如果想系统学习VBA的知识，可以关注微信平台的“烟花系列”或点击“阅读原文”下截兰色幻想录制的VBA80集视频教程。