If you really mean only the first letter should be in caps and all the rest
of the letters in lower case...

Selection.Value = UCase(Left(TextBox2.Text, 1) & LCase(Mid(TextBox2.Text,2)

--
Rick (MVP - Excel)


"jeff" wrote in message
...
This is for when the value of a textbox is pasted.
I know that
Application.Selection.Value = UCase(TextBox2.Text)
will result in all caps. Is there a variation of the code that will
result in just the1st letter being in caps?
I searched but could not find any reference to this.
Thanks
jeff