如何在Excel中将公式替换为结果或值？

假设您需要将单元格中的公式替换为其计算值，当然可以手动逐个替换。然而，如果要替换很多公式，这会浪费大量时间。有没有更简便的方法呢？是的，以下巧妙的方法将帮助您快速将所选区域中的公式替换为其计算值：

例如，我有一系列公式，现在需要将这些公式替换为单元格的值，如下图所示：

使用选择性粘贴命令将公式替换为结果或值
使用VBA将公式替换为结果或值
使用Kutools for Excel将公式替换为结果或值
使用Kutools for Excel将公式替换为文本

使用选择性粘贴命令将公式替换为结果或值

Microsoft Excel的选择性粘贴命令可以帮助您删除所有公式，但保留单元格中的计算值。

步骤1：选择您要操作的区域。

步骤2：按Ctrl + C键复制所选单元格。

步骤3：右键单击所选单元格，并点击 粘贴值 按钮，在 粘贴选项.

下。现在，您可以一次性将所选区域中的所有公式替换为其计算值。

使用 Kutools AI 解锁 Excel 魔法

• 智能执行：执行单元格操作、分析数据和创建图表——所有这些都由简单命令驱动。
• 自定义公式：生成量身定制的公式，优化您的工作流程。
• VBA 编码：轻松编写和实现 VBA 代码。
• 公式解释：轻松理解复杂公式。
• 文本翻译：打破电子表格中的语言障碍。

通过人工智能驱动的工具增强您的 Excel 能力。立即下载，体验前所未有的高效！

使用VBA将公式替换为结果或值

对于Microsoft Excel的熟练用户来说，VBA宏是另一种快速将公式替换为计算值的好方法。

步骤1：在Excel中按住Alt + F11键，打开Microsoft Visual Basic for Applications窗口。

步骤2：点击插入 > 模块，并将以下宏粘贴到模块窗口中。

用于将公式替换为计算值的VBA代码：

Sub DisplayedToActual()
'Updateby20131126
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Application.ScreenUpdating = False
For Each Rng In WorkRng
    Rng.Value = Rng.Text
Next
Application.ScreenUpdating = True
End Sub

步骤3：按 F5 键运行此宏。将弹出一个对话框，供您选择要转换为实际值的区域，见截图：

步骤4：点击确定。您可以看到如下所示的结果：

使用Kutools for Excel将公式替换为结果或值

如果您有Kutools for Excel，其显示值转实际值工具可以帮助您快速将选定单元格中的值或公式转换为它们格式化的方式。

免费安装 Kutools for Excel后，请按照以下步骤操作：

步骤1：选择您要操作的区域。

步骤2：点击Kutools > 转为实际值，见截图：

然后，所选区域中的公式被转换为显示值。

转为实际值——用显示值替换公式

使用Kutools for Excel将公式替换为文本

如果您想将公式替换为文本，可以使用 Kutools for Excel的 转换公式至文本工具一键将公式转换为文本。

安装Kutools for Excel后，请按照以下步骤操作：（立即免费下载Kutools for Excel！）

选择公式并点击 Kutools > 文本 > 转换公式至文本。见截图：

然后，公式被转换为文本，如果想将其转换回公式，只需点击Kutools > 文本 > 转换文本至公式。