Tip Printed from ExcelTip.com
Change all the cells in the ActiveSheet to values using VBA in Microsoft Excel

VBA macro tip contributed by Ron de Bruin, Microsoft MVP - Excel 



Sub Values_1()
With ActiveSheet.UsedRange
            .Value = .Value
        End With
End Sub