I need for the numbers in each column of the attached Excel spreadsheet to "be" just as they appear.
For example, in cell A2510, I need for the number to be just as it appears. It needs to be 15440.92243. It should not be 15440.9224333333, as Excel is showing it as at the top of the application.
What do I need to do, in order to make this happen?
You would need to do something like this for each cell.
range("A2510") = range("A2510").Text
Martin Liss
Here's a macro that will do that.
Sub AlterValue()Dim cel As RangeApplication.ScreenUpdating = FalseApplication.EnableEvents = FalseFor Each cel In ActiveSheet.UsedRange.Cells cel = cel.TextNextApplication.ScreenUpdating = TrueApplication.EnableEvents = TrueEnd Sub
range("A2510") = range("A2510").Text