Does anyone have a MACRO or simple solution to change all UPPERCASE text in a cell into Proper format (1st letter of word is capatalized and rest are lower case).
![]() |
Patch reliability is unclear. Unless you have an immediate, pressing need to install a specific patch, don't do it. |
SIGN IN | Not a member? | REGISTER | PLUS MEMBERSHIP |
-
Change all Text to PROPER format in a column
Home » Forums » AskWoody support » Productivity software by function » MS Excel and spreadsheet help » Change all Text to PROPER format in a column
- This topic has 5 replies, 5 voices, and was last updated 24 years, 4 months ago by
simkins_michael.
AuthorTopicsimkins_michael
GuestJanuary 6, 2001 at 2:20 am #1767507Viewing 4 reply threadsAuthorReplies-
WSJohnBF
AskWoody Lounger -
WSdcardno
AskWoody LoungerJanuary 6, 2001 at 3:01 am #1775091If you are doing this on a one-time basis, John’s suggestion is th way to go. If you are doing this often, try the code in
http://www.wopr.com/cgi-bin/w3t/showthread…d&sb=5#Post1143%5B/url%5Dbut change the “Upper(Cell.Value)” function to “Application.Proper(Cell.Value)”
This will convert the selected cells from upper- or mixed-case to proper case. That thread is not a bad place to start looking at VBA macros for this sort of thing. If you are having a hard time linking to that post, the whole code would like like this:
****
Sub ConvertToUpper()
On Error GoTo errConvertToUpper
Dim Cell As Range
For Each Cell In Selection
If Not Cell.HasFormula Then Cell.Value = Application.Proper(Cell.Value)
Next Cell
exitConvertToUpper:
Exit Sub
errConvertToUpper:
If Err.Number = 438 Then
MsgBox “You probably don’t have cell(s) selected”, vbExclamation, “Selection Alert”
Resume exitConvertToUpper
End If
MsgBox Err.Number & ” ” & Err.Description
Resume exitConvertToUpper
End Sub****
-
WSMaryJ
AskWoody Lounger -
WSTomG
AskWoody LoungerJanuary 6, 2001 at 3:33 am #1775096I provided some code in the VBA forum for UPPER, however since you asked here, I’ll provide my version of dcardno’s answer. (I prefer to use the VBA function StrConv, since there’s no VBA Proper like there is UCase and LCase)
How about this:
Sub ConvertToProper() On Error GoTo errConvertToProper Dim Cell As Range For Each Cell In Selection If Not Cell.HasFormula Then Cell.Value = StrConv(Cell.Value, vbProperCase) Next Cell exitConvertToProper: Exit Sub errConvertToProper: If Err.Number = 438 Then MsgBox "You probably don't have cell(s) selected", vbExclamation, "Selection Alert" Resume exitConvertToProper End If MsgBox Err.Number & " " & Err.Description Resume exitConvertToProper End Sub
HTH
-
simkins_michael
Guest
Viewing 4 reply threads - This topic has 5 replies, 5 voices, and was last updated 24 years, 4 months ago by
-

Plus Membership
Donations from Plus members keep this site going. You can identify the people who support AskWoody by the Plus badge on their avatars.
AskWoody Plus members not only get access to all of the contents of this site -- including Susan Bradley's frequently updated Patch Watch listing -- they also receive weekly AskWoody Plus Newsletters (formerly Windows Secrets Newsletter) and AskWoody Plus Alerts, emails when there are important breaking developments.
Get Plus!
Welcome to our unique respite from the madness.
It's easy to post questions about Windows 11, Windows 10, Win8.1, Win7, Surface, Office, or browse through our Forums. Post anonymously or register for greater privileges. Keep it civil, please: Decorous Lounge rules strictly enforced. Questions? Contact Customer Support.
Search Newsletters
Search Forums
View the Forum
Search for Topics
Recent Topics
-
A CVE-MITRE-CISA-CNA Extravaganza
by
Nibbled To Death By Ducks
3 hours, 46 minutes ago -
Sometimes I wonder about these bots
by
Susan Bradley
3 minutes ago -
Does windows update component store “self heal”?
by
Mike Cross
16 hours, 43 minutes ago -
Windows 11 Insider Preview build 27858 released to Canary
by
joep517
17 hours, 43 minutes ago -
Pwn2Own Berlin 2025: Day One Results
by
Alex5723
17 hours, 9 minutes ago -
Windows 10 might repeatedly display the BitLocker recovery screen at startup
by
Susan Bradley
13 hours, 38 minutes ago -
Windows 11 Insider Preview Build 22631.5409 (23H2) released to Release Preview
by
joep517
20 hours, 25 minutes ago -
Windows 10 Build 19045.5912 (22H2) to Release Preview Channel
by
joep517
20 hours, 27 minutes ago -
Kevin Beaumont on Microsoft Recall
by
Susan Bradley
9 hours, 1 minute ago -
The Surface Laptop Studio 2 is no longer being manufactured
by
Alex5723
1 day, 4 hours ago -
0Patch, where to begin
by
cassel23
22 hours, 36 minutes ago -
CFPB Quietly Kills Rule to Shield Americans From Data Brokers
by
Alex5723
1 day, 18 hours ago -
89 million Steam account details just got leaked,
by
Alex5723
1 day, 5 hours ago -
KB5058405: Linux – Windows dual boot SBAT bug, resolved with May 2025 update
by
Alex5723
2 days, 2 hours ago -
A Validation (were one needed) of Prudent Patching
by
Nibbled To Death By Ducks
1 day, 17 hours ago -
Master Patch Listing for May 13, 2025
by
Susan Bradley
1 day, 4 hours ago -
Installer program can’t read my registry
by
Peobody
1 hour, 49 minutes ago -
How to keep Outlook (new) in off position for Windows 11
by
EspressoWillie
1 day, 15 hours ago -
Intel : CVE-2024-45332, CVE-2024-43420, CVE-2025-20623
by
Alex5723
1 day, 22 hours ago -
False error message from eMClient
by
WSSebastian42
2 days, 13 hours ago -
Awoke to a rebooted Mac (crashed?)
by
rebop2020
2 days, 22 hours ago -
Office 2021 Perpetual for Mac
by
rebop2020
3 days ago -
AutoSave is for Microsoft, not for you
by
Will Fastie
2 hours, 44 minutes ago -
Difface : Reconstruction of 3D Human Facial Images from DNA Sequence
by
Alex5723
3 days, 3 hours ago -
Seven things we learned from WhatsApp vs. NSO Group spyware lawsuit
by
Alex5723
11 hours, 7 minutes ago -
Outdated Laptop
by
jdamkeene
3 days, 9 hours ago -
Updating Keepass2Android
by
CBFPD-Chief115
3 days, 14 hours ago -
Another big Microsoft layoff
by
Charlie
3 days, 14 hours ago -
PowerShell to detect NPU – Testers Needed
by
RetiredGeek
16 hours, 20 minutes ago -
May 2025 updates are out
by
Susan Bradley
18 hours, 2 minutes ago
Recent blog posts
Key Links
Want to Advertise in the free newsletter? How about a gift subscription in honor of a birthday? Send an email to sb@askwoody.com to ask how.
Mastodon profile for DefConPatch
Mastodon profile for AskWoody
Home • About • FAQ • Posts & Privacy • Forums • My Account
Register • Free Newsletter • Plus Membership • Gift Certificates • MS-DEFCON Alerts
Copyright ©2004-2025 by AskWoody Tech LLC. All Rights Reserved.