有过惨痛的教训之后,你会发现在提交一个Excel报告前,一定要记得将其中的公式转换成数值。这是因为:
-
-
有些函数非常容易出错,当其他使用者改动了你的工作表,很有可能出现各种状况;
-
避免其他使用者改动计算过程;
-
避免复杂的公式让其他使用者不知所措
那如何快速从公式转换成数值呢?
01 快捷键法
当说到最迅速最简单的操作,非快捷键莫属了。
你需要做的就是:
-
选中需要转换的单元格
-
Ctrl + C 复制
-
按分别按下Alt + E, +S, +V
02 使用选择性粘贴
如果你真的很难记住快捷键,那火箭君会推荐你使用选择性粘贴工具。
复制完,需要转换的单元格。点击 开始 – > 粘贴 下拉箭头 -> 值
当然你可以可以操作右键菜单来实现选择性粘贴。
03 右键拖拽菜单
具体说来:
-
选中需要转换的内容,右键拖拽至右侧,不松开右键再拖拽回来
-
在弹出的菜单中选择,“仅复制数值”
04 使用Power Query
可能会有一种情况是,你既想保留在每一个单元格里的公式,但又想将它们以静态数值的形式展现给别人以防止犯不必要的错误。这时候你可以考虑使用Power Query。
-
选中表格,并在数据工具栏中,选择 从表格
-
这将引导你打开Power Query编辑器。接着就按你的要求做一些设置。
-
设置无误后,点击 关闭并上载
-
这样你的公式就转换为了数值
使用Power Query的好处是,如果你对原本的公式计算进行了修改,也无须再次进行重复的复制黏贴工作。
05 使用VBA
说到任何奇淫技巧,怎么能忘记万能的VBA呢?
如果你愿意,也可以使用一些简单的VBA命令,将公式变为数值。比如这样:
Sub ConvertToValues()
Dim MyRange As Range
Dim MyCell As Range
Select Case MsgBox(“你无法撤销此操作。 ” & “是否需要保存工作表?”, vbYesNoCancel, “警告”)
Case Is = vbYes
ThisWorkbook.Save
Case Is = vbCancel
Exit Sub
End Select
Set MyRange = Selection
For Each MyCell In MyRange
If MyCell.HasFormula Then
MyCell.Formula = MyCell.Value
End If
Next MyCell