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.
Comprehensive VBA Guide Visual Basic for Applications (VBA) is the language used for writing macros in all Office programs. This complete guide shows both professionals and novices how to master VBA in order to customize the entire Office suite for their needs. Check out Mastering VBA for Office 2010 today!
Need 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 MoreWord allows you to create a macro that is run automatically whenever the program is started. If you want to bypass the ...
Discover MoreDesigning a macro to make it run faster.
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 © 2019 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