Convert all sheets from entire workbook from formulae to data format

Mark_Chor To process 50 worksheets at a time with the code presented by HansVogelaar, use a For Next Loop to loop through a set number of worksheets at a time. For example, if your workbook has 130+ worksheets, you could break it up into 3 groups as follows:

Sub Formulas2ValuesGroup1()
    Dim i As Long
    For i = 1 To 50
        With ThisWorkbook.Worksheets(i).UsedRange
            .Value = .Value
        End With
    Next i
End Sub

Sub Formulas2ValuesGroup2()
    Dim i As Long
    For i = 51 To 100
        With ThisWorkbook.Worksheets(i).UsedRange
            .Value = .Value
        End With
    Next i
End Sub

Sub Formulas2ValuesGroup3()
    Dim i As Long
    For i = 101 To ThisWorkbook.Worksheets.Count
        With ThisWorkbook.Worksheets(i).UsedRange
            .Value = .Value
        End With
    Next i
End Sub

Also worth noting, since you're experiencing an "Out of memory" issue, it's a good idea to close all other applications, as well as any other Excel workbooks, in order to free up as much memory as possible.