allcaps option in excel like word

[Guest]

If I write any text in a cell of ms excel that should be automatically upper
case like ms word. So how can i do ? suggest me.

 

[Guest]

Hi,

Press the capslock key?

Mike

 

[Bill Renaud]

Mike's suggestion is the simplest, but if you must insure that a user
enters all CAPS, even if the CAPS LOCK key if off, you might add an
event handler to the worksheet. The routine below checks to see that the
data entered is actually text. It also turns off other events, so that a
formula can be entered. Events are turned on again, even if an error
occurs. Right click on the worksheet tab, then choose "View Code" at the
bottom of the menu. Paste the following code into the editor window:

Private Sub Worksheet_Change(ByVal Target As Range)
Dim rngCell As Range

On Error GoTo ErrExit

Application.EnableEvents = False

For Each rngCell In Target
With rngCell
If WorksheetFunction.IsText(.Value) _
Then
.Value = UCase(.Value)
End If
End With
Next rngCell

ErrExit:
Application.EnableEvents = True
End Sub