1、适用于少量公式的清除–复制粘贴为值;
2、适用于大量公式的快速清除–宏命令
2.1、新建一个工作表,按ALT+F11,调出宏命令界面,在宏命令界面,按F7调出代码窗口,将下面一段代码复制粘贴到代码区域,
Sub macro1()
Dim sh As Worksheet
For Each sh In Sheets
sh.UsedRange = sh.UsedRange.Value
Next
End Sub
2.2、粘贴完成后,关闭代码窗口,关闭宏命令界面,将工作簿保存为“清除公式仅保留值.xlsm”,请务必注意保存类型选择“Excel启用宏的工作簿”。
2.3、打开我们需要清理公式的表格,再打开我们的宏表格“清除公式仅保留值.xlsm”,
2.4、请注意,我的示例截图的公式是一样的,但是E列数据我修改了单元格格式为保留两位小数,
之所以这样,是想提醒广大朋友,清楚完格式后,如果单元格格式提前进行了设置,比如我这样,所呈现的数据会与单元格格式相符合,而不会出现多位小数,对数据要求精确的朋友请务必留意。
2.5、打开示例表格后,按ALT+F8启用宏,如果在弹出的宏窗口中,列表是空的,如图,
请将下面“位置”选项卡中的“当前工作簿”替换为“所有打开的工作簿”,这样在上面的宏列表区域就会出现我们刚才保存的宏命令,
2.6、我们点击执行,执行完成后我们可以看到所有公式已经被清除,仅保留值。
我们也注意到,E列的数据还是2位小数,而其它列的数据是多位小数,这就是上文中我们说的单元格格式的问题。
2.7、经测试,深度隐藏的工作表中的公式也会被清除。