要使用 VBA 代码将 Excel 表格中所有单元格的公式转换为值,请按照以下步骤操作:
- 打开 Excel 文档并按下“Alt+F11”打开 VBA 编辑器。
- 在 VBA 编辑器中,插入一个新的模块。
- 在新模块中,输入以下代码:
Sub ConvertFormulasToValues()
For Each c In ActiveSheet.UsedRange.Cells
c.Value = c.Value
Next c
End Sub
在上述代码中,ActiveSheet.UsedRange.Cells 代表当前工作表中已使用的单元格。c.Value = c.Value 将单元格的值设置为其自身的值,从而将公式转换为值。
- 保存并关闭 VBA 编辑器窗口。
- 在 Excel 工作表中,按下“Alt+F8”打开宏对话框。
- 选择“ConvertFormulasToValues”宏,然后单击“运行”按钮。
现在,您已成功地使用 VBA 代码将 Excel 表格中所有公式转换为值。