Solved

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

Posted on 2016-11-03
12
40 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 8

Expert Comment

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

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 8

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
Free Tool: Subnet Calculator

The subnet calculator helps you design networks by taking an IP address and network mask and returning information such as network, broadcast address, and host range.

One of a set of tools we're offering as a way of saying thank you for being a part of the community.

 
LVL 30

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 23

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 30

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 30

Accepted Solution

by:
Subodh Tiwari (Neeraj) earned 500 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 33

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 30

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 30

Expert Comment

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

Featured Post

Active Directory Webinar

We all know we need to protect and secure our privileges, but where to start? Join Experts Exchange and ManageEngine on Tuesday, April 11, 2017 10:00 AM PDT to learn how to track and secure privileged users in Active Directory.

Question has a verified solution.

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

Microsoft Office Picture Manager is not included in Office 2013. This comes as a shock to users upgrading from earlier versions of Office, such as 2007 and 2010, where Picture Manager was included as a standard application. This article explains how…
No matter the version of Windows you are using, you may have some problems with Windows Search running too slow or possibly not running at all. Before jumping into how you can solve this issue, just know there are many other viable alternative deskt…
This Micro Tutorial demonstrates in Microsoft Excel how to consolidate your marketing data by creating an interactive charts using form controls. This creates cool drop-downs for viewers of your chart to choose from.
Although Jacob Bernoulli (1654-1705) has been credited as the creator of "Binomial Distribution Table", Gottfried Leibniz (1646-1716) did his dissertation on the subject in 1666; Leibniz you may recall is the co-inventor of "Calculus" and beat Isaac…

830 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