Note this is Case sensitive.........but can be modified not to be if
needed......

Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
' Returns specified result for given value entered in A1
' by Chuck, CABGx3
If Not Target.Range("a1") Is Nothing Then
Select Case Range("A1").Value
Case "A"
Range("A1").Value = "Arnold"
Case "B"
Range("A1").Value = "Brendan"
Case "C"
Range("A1").Value = "Charlie"
Case Else
Range("A1") = ""
End Select
End If
End Sub

hth
Vaya con Dios,
Chuck, CABGx3




"Sandy" wrote:

Hi

Is it possible to have a cell value adjust depending what is typed into it?
E.g. I want to be able to type A or B or C and have the value of the same
cell change to Arnold or Brendan or Charlie respectively.

Sandy