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.
The First and Last Word on Word! Bestselling For Dummies author Dan Gookin puts his usual fun and friendly candor back to work to show you how to navigate Word 2013. Spend more time working and less time trying to figure it all out! Check out Word 2013 For Dummies today!
When text is added to your document by a macro, and that text includes quotes or apostrophes, Word won't change the ...
Discover MoreWord allows you to create a macro that is run automatically whenever the program is started. If you want to bypass the ...
Discover MoreThere may be times when you want your macro to print out a list of styles in the document. If so, then you can do it with ...
Discover MoreFREE SERVICE: Get tips like this every week in WordTips, a free productivity newsletter. Enter your address and click "Subscribe."
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 © 2018 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