Please Note: This article is written for users of the following Microsoft Word versions: 97, 2000, 2002, and 2003. If you are using a later version (Word 2007 or later), this tip may not work for you. For a version of this tip written specifically for later versions of Word, click here: Converting Text to Uppercase in a Macro.
There are two ways you can convert text to uppercase in Word, within a macro. The first is to use the AllCaps property and the second is to use the Case property. The following shows how to use both methods.
Selection.Font.AllCaps = True Selection.Range.Case = wdUpperCase
Both of these statements assume you have selected the text to be changed prior to issuing the statements. The difference between them is that the AllCaps property controls only the formatting of the text—it only appears as uppercase. The Case property, on the other hand, actually changes the letters in the selection so they are uppercase.
Note:
WordTips is your source for cost-effective Microsoft Word training. (Microsoft Word is the most popular word processing software in the world.) This tip (1723) applies to Microsoft Word 97, 2000, 2002, and 2003. You can find a version of this tip for the ribbon interface of Word (Word 2007 and later) here: Converting Text to Uppercase in a Macro.
Do More in Less Time! Are you ready to harness the full power of Word 2013 to create professional documents? In this comprehensive guide you'll learn the skills and techniques for efficiently building the documents you need for your professional and your personal life. Check out Word 2013 In Depth today!
So, you need to convert a number to text that is over one million? Here is a VBA macro that will convert up to 999,999,999.
Discover MoreIf you need to determine a random value in a macro, you can do so using the Rnd function. This tip presents the syntax ...
Discover MoreNeed to figure out a date a certain number of days, weeks, months, or years in the future? It's easy to do using the ...
Discover MoreFREE SERVICE: Get tips like this every week in WordTips, a free productivity newsletter. Enter your address and click "Subscribe."
2019-02-12 18:47:41
Christopher Manescu
I am looking for a macro that changes all text between <title> <\title> to all uppercase
2018-11-30 13:50:31
Ian
Thanks a lot! This is just what I needed.
2017-08-08 09:26:55
John Davidson
Later ... I tried:
Sub Test()
Dim sFont As String
sFont = Selection.Font.Name
Selection.Range.Case = wdNextCase
Selection.Font.Name = sFont
End Sub
But changing the font in this way doesn't change the SimSun font back again to the original font. If I do it manually, the font is changed but not using VBA.
Any thoughts anyone?
2017-08-08 07:06:14
John Davidson
Use of Word's Change Case command or using VBA's 'Selection.Range.Case = wdLowerCase' or 'Selection.Range.Case = wdNextCase' changes the font of some diacritical characters to SimSun
For instance, try changing the case of dǎoyǐn.
Is there a way to prevent Word from doing this? The only way I can think of is to turn the ChangeCase command into a VBA routine that checks the font of the selected text and resets it after changing the case.
Got a version of Word that uses the menu interface (Word 97, Word 2000, Word 2002, or Word 2003)? This site is for you! If you use a later version of Word, visit our WordTips site focusing on the ribbon interface.
FREE SERVICE: Get tips like this every week in WordTips, a free productivity newsletter. Enter your address and click "Subscribe."
Copyright © 2020 Sharon Parq Associates, Inc.
Please Note:
This article is written for users of the following Microsoft Word versions: 97, 2000, 2002, and 2003. If you are using a later version (Word 2007 or later), this tip may not work for you. For a version of this tip written specifically for later versions of Word, click here: 
Comments