工作表中很多数据都是由函数公式计算生成的，那么如何让别人只看到计算的结果，而将使用的函数公式隐藏起来呢？如果是在通用Excel系统，这个需求可以使用模版权限来控制，但是在单机Excel中，就需要用简单的VBA来解决这一问题。

一、创建宏

在Excel中按下“Alt+F11”键，在打开的VB编辑窗口中选择一个模块，然后将右侧窗口中输入以下代码：

Sub 密码保护()'宏的名称

ActiveSheet.Unprotect ("12345678")'默认密码

Cells.Select

Selection.Locked = False

Selection.SpecialCells(xlCellTypeFormulas, 23).Select

Selection.Locked = True

Selection.FormulaHidden = True

ActiveSheet.Protect ("123456")

ActiveSheet.EnableSelection = xlUnlockedCells

End Sub

二、应用VBA

在Excel界面上，放置一个按钮图形（或自定义图形），然后右键点击该图形，选择指定宏，再选择【密码保护】这个名称，最后点击确定即可。

我们要加密时只需单击该按钮，就可以将当前工作表保护起来，并且默认密码为12345678，根据该思路，我们可以经过变通，设置更多其它效果，以方便我们日常工作。

本文由互和科技·通用Excel官网原创，转载请注明。