You may also want to try a VBA work-around, if you want to achieve this effect automatically as you enter values in that column.
Right click on your sheet tab, left click on View Code, and paste this in:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column<> 1 Or Target.Cells.Count > 1 Then Exit Sub
Application.EnableEvents = False
Target = "'''" & Target & "''"
Application.EnableEvents = True
End Sub
Please note a few important points:
(1) This code is for column A (that's what the "1" means in the line "Target.Column<> 1 "). Modify for column number as needed.
(2) Any numbers you enter will not be of much use to you in trying to do calculations with them, unless you use some advance formula techniques.
(3) It will work with drag and drop but not with AutoFill when the source active cell is outside column A.
(4) You will lose the Undo feature on this worksheet.
FYI, the quotes within the quotes are actually apostrophes. The preceding quotes are 3 apostrophes, and the proceeding ones are 2 apostrophes.
Kind of ugly looking code but I think it does what you are asking, in addition to the formula solutions offered above.
Any help?
_________________
Tom Urtis
This message was edited by Tom Urtis on 2002-04-29 06:39