Oryssia, here is one way,

Sub test()
Dim st As String
st = InputBox("Enter 1 Character")
If Len(st) 1 Then
MsgBox "You Can Only Enter 1 Character"
Else
MsgBox "You Entered " & st
End If
End Sub


--
Paul B
Always backup your data before trying something new
Please post any response to the newsgroups so others can benefit from it
Feedback on answers is always appreciated!
Using Excel 2002 & 2003

"Oryssia" wrote in message
...
Can I limit Input Box size to fit only 1 character?