I have a simple worksheet that populates the sheet with numbers based
on 3 variables from a second sheet. Everything is working correctly up
until I add a couple of text characters to each entry: "in", it is the
last process that needs to be done to the numbers - unfortunately
doing this kills the number formatting.

An example of the number entries before the "in" is added at the end:

-0.00615808

After adding the "in":

-6.15808000000001E-03in

Below is part of the routine I am using (it's rough so don't mind the
basic format):

Do
i = i + 1
Sheets(sn).Cells(i, 2).Select
Selection.Value = Sheets("Parameters").Cells(i - 1,
2).Value - Sheets("Variables").Cells(2, 3).Value
Selection.NumberFormat = "0.00000000"
Loop Until Sheets("Parameters").Cells(i, 1).Value = a

i = 0
Do
i = i + 1
Sheets(sn).Cells(i, 1).Select
Selection.Value = Selection.Value & "in"
Sheets(sn).Cells(i, 2).Select
Selection.Value = Selection.Value & "in"
Loop Until Sheets("Parameters").Cells(i, 1).Value = a & "in"

Any help is appreciated.

Chad