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.
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.
Create Custom Apps with VBA! Discover how to extend the capabilities of Office 2013 (Word, Excel, PowerPoint, Outlook, and Access) with VBA programming, using it for writing macros, automating Office applications, and creating custom applications. Check out Mastering VBA for Office 2013 today!
Want a fast way to add brackets around a selected word? You can use this simple macro to add both brackets in a single step.
Discover MoreYou may have a need to find out how many times a certain text string occurs within a document. You can find out manually ...
Discover MoreUnderstanding Word's Object Model and how it relates to macros in VBA.
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 © 2017 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