在Excel中，可以使用VBA编写代码来实现将公式转换为值的操作。以下是一个示例代码：

Sub ConvertFormulasToValues()
    Dim rng As Range
    Dim cell As Range
    
    ' 选择要转换的区域
    Set rng = Selection
    
    ' 循环遍历每个单元格
    For Each cell In rng
        ' 将公式转换为值
        cell.Value = cell.Value
    Next cell
End Sub

要使用该代码，只需按下Alt + F11打开VBA编辑器，然后插入一个新的模块，并将上述代码粘贴到模块中。然后在Excel中选择要转换的区域，再运行该宏即可。

另外，如果你只想保存值而不是转换公式，可以使用Excel的另存为功能来备份文件。以下是一个示例代码：

Sub BackupValues()
    Dim wb As Workbook
    Dim ws As Worksheet
    
    ' 打开要备份的文件
    Set wb = Workbooks.Open("C:\路径\文件名.xlsx")
    
    ' 循环遍历每个工作表
    For Each ws In wb.Worksheets
        ' 将所有公式转换为值
        ws.UsedRange.Value = ws.UsedRange.Value
    Next ws
    
    ' 保存备份文件
    wb.SaveAs "C:\路径\备份文件名.xlsx"
    
    ' 关闭原始文件
    wb.Close
End Sub

在上述代码中，你需要将“C:\路径\文件名.xlsx”替换为你要备份的文件的路径和名称。然后运行该宏，它将打开指定的文件，将所有工作表的公式转换为值，并将备份文件保存到指定的路径中。最后，关闭原始文件。