68手游网

在使用Excel时，如果经常需要将某些区域中的公式结果转换为数值，可以使用下面的VBA代码，并将其指定一个快捷键。这样，用快捷键就可以快速将某些区域中的公式结果转换为数值。方法如下：

1.按Alt+F11，打开VBA编辑器，单击菜单“插入→模块”。

2.在右侧的代码窗口中输入下列VBA代码：

Sub MakeValues()
Dim Rng As Range
Application.ScreenUpdating = False
Application.Calculation = xlCalculationManual
For Each Rng In Selection
Rng.Value = Rng.Value
Next Rng
Application.ScreenUpdating = True
Application.Calculation = xlCalculationAutomatic
End Sub

3.关闭VBA编辑器，返回到Excel工作表界面。

4.按快捷键Alt+F8，打开“宏”对话框。选择“MakeValues”宏命令，点击“选项”按钮。

在弹出的“宏选项”对话框中，为该宏指定一个快捷键，如“Ctrl+E”。

单击“确定”按钮，关闭“宏”对话框。

以后，无论在该工作簿的哪个工作表中，如果需要将某些区域中的公式结果转换为数值，只需按快捷键“Ctrl+E”即可。其方便之处是使用了快捷键，较为快捷，另外还可以一次选区多个不连续的区域进行转换，而用选择性粘贴为数值的方法无法实现这一点。但其不足之处是运行宏代码后，撤消列表中的内容将被清空，因而无法撤消与恢复