ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Upper case 1st letter only (https://www.excelbanter.com/excel-programming/433593-upper-case-1st-letter-only.html)

jeff

Upper case 1st letter only
 
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

Per Jessen

Upper case 1st letter only
 
Hi

You can use the worksheetfunction 'Proper' like this:

Application.Selection.Value = WorksheetFunction.Proper(TextBox2.Text)

Regards,
Per

"jeff" skrev i meddelelsen
...
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



Rick Rothstein

Upper case 1st letter only
 
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



jeff

Upper case 1st letter only
 
On Sep 14, 2:28*pm, "Per Jessen" wrote:
Hi

You can use the worksheetfunction 'Proper' like this:

Application.Selection.Value = WorksheetFunction.Proper(TextBox2.Text)

Regards,
Per

"jeff" skrev i ...



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- Hide quoted text -


- Show quoted text -


Thanks!
Works just right.
I played around with it myself, but I just couldn't get it the syntax
right. I appreaciate the help.
j.o.

Jacob Skaria

Upper case 1st letter only
 
You can use the VBA function StrConv(). Try

Msgbox StrConv("jeff & jacob skaria",vbProperCase )

If this post helps click Yes
---------------
Jacob Skaria


"jeff" wrote:

On Sep 14, 2:28 pm, "Per Jessen" wrote:
Hi

You can use the worksheetfunction 'Proper' like this:

Application.Selection.Value = WorksheetFunction.Proper(TextBox2.Text)

Regards,
Per

"jeff" skrev i ...



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- Hide quoted text -


- Show quoted text -


Thanks!
Works just right.
I played around with it myself, but I just couldn't get it the syntax
right. I appreaciate the help.
j.o.



All times are GMT +1. The time now is 07:10 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com