automatic capital letters

2 Questions.

(1) I would like to set up the row so that ALL LETTERS in that ro
would become Capital letter auromatically.

(2) In the second row, I would like excel to capitalize the FIRS
letter of each word automatically as I type in the cell

--
NYBo
-----------------------------------------------------------------------
NYBoy's Profile: http://www.excelforum.com/member.php...nfo&userid=836
View this thread: http://www.excelforum.com/showthread.php?threadid=27207

NYBoy, put this in the worksheet code

Private Sub Worksheet_Change(ByVal Target As Range)
'will change row 1 to caps, row 2 to proper
On Error GoTo Error_handler

With Target
If Not .HasFormula Then
Application.EnableEvents = False
If Target.Row = 1 Then Target.Value = UCase(Target.Value)
If Target.Row = 2 Then Target.Value = Application.Proper(Target.Value)

Application.EnableEvents = True
End If
End With

Error_handler:
Resume Next

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 2000 & 2003
** remove news from my email address to reply by email **

"NYBoy" <NYBoy.1eoq5b@excelforum-nospam.com> wrote in message
news:NYBoy.1eoq5b@excelforum-nospam.com...
>
> 2 Questions.
>
> (1) I would like to set up the row so that ALL LETTERS in that row
> would become Capital letter auromatically.
>
> (2) In the second row, I would like excel to capitalize the FIRST
> letter of each word automatically as I type in the cell.
>
>
> --
> NYBoy
> ------------------------------------------------------------------------
> NYBoy's Profile:
> http://www.excelforum.com/member.php...fo&userid=8360
> View this thread: http://www.excelforum.com/showthread...hreadid=272072
>