Add this one-liner to a hotkey combination:

ActiveCell.Value = ActiveCell.Value & " < 10,000"


CE



"jjnotme" wrote in message
...
I have text in a cell which reads xxx (the text can be anything). I
want to press a key and add a space and "< 10,000" to the cell
How do I do that?