KutoolsforOffice — 一套方案，五大工具。事半功倍。

如何在 Excel 中删除所有公式，仅保留单元格中的值？

作者Siluvia修改日期

在众多 Excel 工作表中，单元格通常包含引用其他单元格、工作表甚至外部数据源的公式。然而，在某些场景下，您可能希望仅保留计算结果，同时清除所有底层公式引用——例如，在与他人共享数据前，或为了防止后续编辑意外更改结果而锁定当前数值。此时，将公式转换为静态值就显得尤为关键。幸运的是，Excel 提供了多种高效方法，可在删除公式引用的同时完整保留实际数值。本文将为您详细介绍这些实用技巧，助您轻松选择最适合自身需求或工作流程的解决方案。

通过复制和粘贴删除所有公式引用但保留单元格中的值
一键删除所有公式引用但保留单元格中的值
VBA 代码 —— 使用宏自动将所选单元格中的所有公式替换为其计算值

通过复制和粘贴删除所有公式引用但保留单元格中的值

在 Excel 中，删除公式引用并保留实际计算值最直接且通用兼容的方法之一，是使用“复制”配合“选择性粘贴”功能。此方法操作快捷、无需插件，且适用于所有现代版本的 Excel。但请注意：一旦将公式替换为其计算结果，您将失去该公式原有的自动计算与单元格链接功能。因此，仅当确认不再需要这些单元格的动态更新时，才建议使用此方法。

请按以下步骤在 Excel 中删除指定单元格中的所有公式引用但保留其值：

1. 选择包含要转换为值的公式的单元格，然后按下 Ctrl+C 复制这些单元格。在所选区域仍处于高亮状态时，右键单击高亮区域内的任意位置以打开上下文菜单，随后在选择性粘贴部分中选择值。（若使用功能区界面，也可切换至）开始选项卡，点击粘贴下拉菜单，再选择选择性粘贴值。）参见下图：

执行此操作后，所选单元格中的所有公式将被其当前值替换，如下图所示。单元格的显示内容保持不变，但公式已被移除，仅保留固定的数字或文本。

显示在 Excel 中删除公式引用并保留数值后的结果的截图

适用场景：此解决方案适用于中小型区域，或当您希望完全掌控需转换的区域时。如需频繁重复此操作，使用键盘快捷键（Ctrl+Alt+V，然后按 V）即可大幅提升效率！

优点：无需插件或编码，即时生效，适用于所有 Excel 版本。
缺点：一旦保存更改并关闭工作簿，操作将无法撤销；且每次仅适用于当前选定区域。

提示与注意事项：在粘贴数值前，请务必仔细检查所选区域，特别是当公式存在相互引用时。如需保留公式备份，建议在操作前将原始工作表复制到新工作表，以防数据丢失！

一键删除所有公式引用但保留单元格中的值

Kutools for Excel 提供的转换为数值功能，为您提供更快捷的一键式解决方案——尤其适用于大型数据集或例行任务。该工具简化操作流程，让您无需额外复制粘贴，即可立即将所选范围内的所有公式转换为静态值，在处理大型报表、共享模板或需保持静态的机密财务数据时尤为实用。

Kutools for Excel 提供 300 多项高级功能，简化复杂任务，提升创造力与效率。集成 AI 能力，Kutools 精准自动化任务，让数据管理变得轻松自如。Kutools for Excel 的详细信息……         免费试用……

1. 选择包含要转换的公式的单元格或区域，然后只需单击 Excel 工具栏中的 Kutools> 转换为数值。

所选单元格中的所有公式将立即被其计算结果替代，而单元格中的数字和文本将完全保持原样显示。确认效果请参见下图：

显示在 Excel 中删除公式引用并保留数值后的结果的截图

Kutools for Excel——包含 300 多个 Excel 必备工具，并永久免费畅享 AI 功能！立即下载！

场景建议：Kutools for Excel 适用于需要高效执行重复操作或经常处理含大量公式的大型工作簿的用户，尤其适合希望大幅减少重复手动操作、降低出错风险的人士。

优点：极速高效，轻松应对大型及多个区域；节省的时间尤其适合频繁执行的任务。
缺点：需安装 Kutools for Excel 加载项（付费工具，提供试用版）。

如遇部分公式未被转换的情况，请确保在使用该工具前已选中完整的预期范围。建议在执行批量操作前保存工作簿，以便必要时轻松还原更改。

VBA 代码 —— 使用宏自动将所选单元格中的所有公式替换为其计算值

对于高级用户或希望自动化此流程的用户而言，使用自定义 VBA 宏是另一种有效解决方案。当您有重复性需求或希望一次性对多个不连续区域执行将公式转变为值时，此方法尤为实用。借助 VBA，您可通过单条命令执行转换，为重复性任务节省大量时间和精力。

注意：此方法适用于熟悉在 Excel 中运行 VBA 宏的用户。若您的工作场所政策限制使用宏，请在使用前咨询管理员。

1. 单击开发工具>Visual Basic，即可打开 VBA 编辑器。在 Microsoft Visual Basic for Applications 窗口中，点击插入> 模块，然后将以下代码复制并粘贴到新模块中：

Sub ConvertFormulasToValues()
    Dim rng As Range
    Dim WorkRng As Range
    On Error Resume Next
    xTitleId = "KutoolsforExcel"
    Set WorkRng = Application.Selection
    Set WorkRng = Application.InputBox("Please select the range where you want to remove formulas and keep values:", xTitleId, WorkRng.Address, Type:=8)
    If WorkRng Is Nothing Then Exit Sub
    For Each rng In WorkRng
        If rng.HasFormula Then
            rng.Value = rng.Value
        End If
    Next
End Sub

2. 要运行宏，请单击 VBA 编辑器中的运行按钮运行按钮。此时将弹出对话框，提示您选择要将公式替换为值的区域。选定目标区域并确认后，宏会自动将该区域内的所有公式转换为其计算结果，在保留显示值不变的同时删除公式引用。

适用场景：此解决方案高度灵活，适用于批量处理大型或不规则的单元格区域。当您希望将此操作作为更大工作流或宏例程的一部分实现自动化时，尤其有价值。

优点：可自动化重复任务；轻松扩展或与其他自动化步骤无缝结合；适用于复杂的选择场景。
缺点：需启用宏；不建议不熟悉 VBA 的用户使用；部分组织的宏安全设置可能限制其使用。

故障排除：如果遇到运行时错误，请确保已选中有效区域，并确认 Excel 实例中已启用宏。如需撤消操作，请立即使用 Excel 的撤消功能（Ctrl + Z）；一旦保存并关闭工作簿，宏操作将无法撤消。

相关文章：

最佳办公效率工具

🤖KUTOOLS AI 助手：基于以下内容革新数据分析：智能执行   |  生成代码|  创建自定义公式  |  数据分析及生成图表|  调用 Kutools Functions……
热门功能：查找、高亮或标记重复项   |  删除空白行   |  合并列或单元格且不丢失数据   |  不使用公式的四舍五入……
高级 LOOKUP：多条件 VLookup  |  多值 VLookup  |   跨多工作表 VLookup   |   模糊查找……
高级下拉列表：快速创建下拉列表   |  级联下拉列表   |  多选下拉列表……
列管理器：添加指定数量的列|移动列|切换隐藏列的可见性状态|比较区域与列……
特色功能：网格聚焦   |  设计视图   |增强编辑栏   | 工作簿和表管理器   |  资源库（自动文本）|  日期提取   |  汇总工作表  |  加密/解密单元格   | 按列表发送邮件   |  超级筛选   |   特殊筛选（筛选粗体单元格/斜体/删除线……） ......
精选 15 工具集：12 文本工具（添加文本，删除特定字符，……）|   50+ 图表 类型（甘特图，……）|   40+ 实用公式（基于生日计算年龄，……）|   19 插入工具（插入二维码，从路径插入图片，……）|   12 转换工具（小写金额转大写，汇率转换，……）|   7 合并和拆分工具（高级合并行，分割单元格，……）|……更多
在您的首选语言中使用 Kutools – 支持英语、西班牙语、德语、法语、中文及 40+ 种其他语言！

使用 Kutools for Excel 大幅提升您的 Excel 技能，体验前所未有的高效。Kutools for Excel 提供 300 多项高级功能，助您提升生产力、节省时间。立即点击此处，获取您最需要的功能……

Office Tab 为 Office 带来标签式界面，让您的工作更轻松

  • 在 Word、Excel、PowerPoint、Publisher、Access、Visio 和 Project 中启用标签式编辑和阅读。
  • 在同一个窗口的新标签页中打开并创建多个文档，而非在新窗口中。
  • 将您的工作效率提升 50%，每天减少数百次鼠标点击！

所有 Kutools 插件，一个安装程序

Kutools for Office 套件捆绑了适用于 Excel、Word、Outlook 和 PowerPoint 的插件以及 Office Tab Pro，非常适合需要跨多个 Office 应用高效协作的团队。

ExcelWordOutlookTabsPowerPoint
  • 一体化套件— Excel、Word、Outlook 和 PowerPoint 插件 + Office Tab Pro
  • 一个安装程序，一个许可证— 几分钟内完成设置（支持 MSI）
  • 协同效果更佳— 在多个 Office 应用中实现高效协同
  • 30 天全功能试用— 无需注册，无需信用卡
  • 超值之选— 比单独购买插件更省钱