PDA

View Full Version : Solved: How to keep number value displaying fractional value



YellowLabPro
08-01-2007, 05:33 AM
This procedure is to add a double quote to the end of a value indicating inches, which it does, but then converts the display value back to a decimal. How do I get around this? The cell format is already set to fraction, and when I check its format after the d.quote is added it still remains its fractional format status.


For i = 4 To LRowV
If Cells(i, "G").Text = "HWBLTS" Or Cells(i, "G").Text = "HWRISR" _
And Cells(i, "M").Value > 0 And Right(Cells(i, "M").Value, 1) <> Chr(34) Then
Cells(i, "M").Value = Cells(i, "M").Value & Chr(34)
End If
Next i

Bob Phillips
08-01-2007, 05:48 AM
For i = 4 To lRowV
If Cells(i, "G").Text = "HWBLTS" Or Cells(i, "G").Text = "HWRISR" _
And Cells(i, "M").Value > 0 Then
Cells(i, "M").NumberFormat = "# ##/##\"""
End If
Next i

YellowLabPro
08-01-2007, 06:56 AM
Beauty Bob- Thanks!