前景提要

说到Excel，那么不可避免得要说到Excel的公式了，在日常的Excel操作中，借助各种现成的Excel函数所形成的的公式，能够让我们轻松的获得很多我们想要的数据计算结果，但是方便的同时，也带来了一些弊端。

比方说公式没有办法隐藏，一些比较关键性的数据，我们写在公式中，但是并不想让其他人看到公式，从而逆推出来我们一些关键的参数，比方说工资比例分成等。

这里你可能会说直接复制数据到另外一个表就可以了，这样虽然可以避免公式被看到，但是如果数据量过大的话，复制粘贴也是一件很耗时的事情，有没有可能在工作表中隐藏这些公式，仅仅是展示公式的结果呢？

场景说明

其实也不难，看看VBA如何来实现这样的结果

这是我们今天模拟的场景，其中B列和C列都是有公式的，我们只要将鼠标放在单元格中，选中就可以看到公式了。那么我们如何隐藏这些公式呢？

代码区

Sub hidden_furmula()

Dim rng As Range

With ActiveSheet.UsedRange

Set rng = .SpecialCells(xlCellTypeFormulas)

.FormulaHidden = False

With rng

.FormulaHidden = True

End With

End With

ActiveSheet.Protect "111"