If value is text1, put text2 in new cell

Using Excel 2007. I have a column with text in each cell, and depending on what the text is within the range, want Excel to automatically enter different text in the adjacent cell.

For example, within the range of A2:A5, if Excel finds "apple" in cell A2, it enters "red" in cell B2. If Excel finds "grape" in the range A2:A5, it enters "green" in cell B4.

Row --Col A -- Col B
2 --apple -- red
3 --apple -- red
4 --grape -- green
5 --kiwi ---green

Thanks for your help.

if it is as simple as you describe (just apple, grape, red, green), then try using this...
=IF(A1="Apple","Red",IF(A1="grape","green",""))

However, I doubt that you're needs are quite that simple? If nbot, then I think you need to set up a table with you're "choices" in it - red, green etc

so, assuming your're data is in A1:A5, and you're "choices are in F1:G3 (adjused as needed), then create a vlookup as shown below.
=VLOOKUP(A1,$F$1:$G$3,2,FALSE)
the "choice" table would look something like this...

apple red
grape green
kiwi green

you can nest a max of 7 if()'s, thats why I suggested a vlookup table in post #3

@ Moo....64??

@ Moo. hmm ok, you learn something new every day, thanks