Want to protect your cyber security and still get fast solutions? Ask a secure question today.Go Premium

x
?
Solved

I would like the first letter in an Excel cell that I type to be capitalized always.

Posted on 2016-11-03
12
Medium Priority
?
47 Views
Last Modified: 2016-11-28
I would like the first letter that I type in an Excel spreadsheet to be capitalized, always.
Either for the entire excel sheet or specific columns or specific cells.
Is this possible?
Preferably if this could be done automatically without VBS or a Macro that would be good, otherwise those are also options.
Thanks in advance for your assistance.
0
Comment
Question by:100questions
  • 5
  • 2
  • 2
  • +2
12 Comments
 
LVL 9

Expert Comment

by:Koen
ID: 41872179
I don't think it is possible without coding it...
0
 
LVL 34

Expert Comment

by:Rob Henson
ID: 41872193
As far as I know there is no way of doing that without VBA, unlike in MS Word where it recognises the start of a sentence and capitalizes the first letter automatically.

You can convert entries to specific formats with some formulas:

=UPPER(Text)   will convert to all upper case
=LOWER(Text)   will convert to all lower case
=PROPER(Text)  will convert the first letter of each word to upper case and the rest to lower case.

Text can be a cell reference whose contents are to be converted. There is a limit to PROPER that I am aware of, if the text includes an abbreviation which should be all capitals, eg USD or USA or UK, it would still convert it, ie Usd, Usa, Uk.

Thanks
Rob H
0
 
LVL 9

Expert Comment

by:Koen
ID: 41872224
the word functionality (capitalizing the first word) works exactly the same in Excel... (try typing a multisenctence paragraph in one cell (with interpunction))

However, Excel is not a text tool, it is a spreadsheet... Hence Excel does not think you'll write full sentences. Therefor it does not work on single words (nor on your first full sentence).

The only proper way I see, is writing a macro that that capitalizes the first letter (according to some rules you can set)
0
Independent Software Vendors: We Want Your Opinion

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

 
LVL 34

Expert Comment

by:Subodh Tiwari (Neeraj)
ID: 41872255
Right click the Sheet Tab --> View Code --> And paste the code given below into the opened code window --> Save your workbook as Macro-Enabled Workbook.
The below code will do what you want if you input anything in the column A:Z.

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.CountLarge > 1 Then Exit Sub
If Not Intersect(Target, Range("A:Z")) Is Nothing Then
    Application.EnableEvents = False
    Target = StrConv(Target.Value, vbProperCase)
    Application.EnableEvents = True
End If
End Sub

Open in new window

0
 
LVL 26

Expert Comment

by:Brian B
ID: 41872300
I don't know if this is useful to you, but if you only wanted to have a specific area or column like you described, you could do it using a formula:

=LEFT(UPPER(A1),1)&RIGHT(A1,LEN(A1)-1)

Obviously you'd have the unformatted text in your spreadsheet as well, you would just have to leave it out of the print range, or hide it or something.
0
 

Author Comment

by:100questions
ID: 41872332
@ Subodh Tiwari (Neeraj)
Thanks very much.
Will the macro run automatically, or would it need to be triggered?
0
 
LVL 34

Expert Comment

by:Subodh Tiwari (Neeraj)
ID: 41872732
This is a Change Event code and would be placed on Sheet Module (as per the instructions in my previous post). The code will be triggered automatically once you change or input any content in a cell in columns A:Z as per the code.
0
 
LVL 34

Accepted Solution

by:
Subodh Tiwari (Neeraj) earned 2000 total points (awarded by participants)
ID: 41872737
Please find the attached (a blank workbook) with the code implemented.
To check the code, input a text in any cell in the range A:Z.
Capital-Letter.xlsm
0
 
LVL 34

Expert Comment

by:Rob Henson
ID: 41872748
As always, please be aware that running any VBA clears your undo history.
0
 

Author Comment

by:100questions
ID: 41881181
@Subodh:
I tried this in a macro but it does not seem to work.
0
 
LVL 34

Expert Comment

by:Subodh Tiwari (Neeraj)
ID: 41881554
Didn't it work in the file I attached as described?
The code in the attached was a sheet change event code. That means the code will be triggered automatically when you input a string in the range A:Z and it will be placed on the Sheet module not on the standard module like Module1 etc.
0
 
LVL 34

Expert Comment

by:Subodh Tiwari (Neeraj)
ID: 41903917
The chosen answer clearly resolved the question.
0

Featured Post

[Webinar] Database Backup and Recovery

Does your company store data on premises, off site, in the cloud, or a combination of these? If you answered “yes”, you need a data backup recovery plan that fits each and every platform. Watch now as as Percona teaches us how to build agile data backup recovery plan.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Quickbooks hosting can do wonders to your enterprise but considering the points elaborated in the article which will help you to better analyze the outcomes. So scan your business, its needs and then move to the new world of limitless benefits.
Currently, there is an issue with being able to copy values from an external application to a dropdown list in Project Web Access (PWA).  The standard copy and paste methods don't seem to work properly. Here is a way to accomplish this task to s…
The Relationships Diagram is a good way to get an overall view of what a database is keeping track of. It is also where relationships are defined. A relationship specifies how two tables connect to each other. As you build tables in Microsoft Ac…
Enter Foreign and Special Characters Enter characters you can't find on a keyboard using its ASCII code ... and learn how to make a handy reference for yourself using Excel ~ Use these codes in any Windows application! ... whether it is a Micr…

580 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question