Written by Allen Wyatt (last updated July 27, 2019)
This tip applies to Word 97, 2000, 2002, and 2003
Jacie wrote that she had created a macro that set text to Time New Roman. She wanted to change the macro to be a toggle between Times New Roman and Arial Narrow Bold, and wondered how to do it.
The easiest way to do it in a macro is simply to check the font used in your selected text, and then take steps based on what you find. For instance, the following macro will only take action if the selected text is either Times New Roman or Arial Narrow:
Sub ChangeSelectedFont() Select Case Selection.Font.Name Case "Times New Roman" Selection.Font.Name = "Arial Narrow" Selection.Font.Bold = True Case "Arial Narrow" Selection.Font.Name = "Times New Roman" Selection.Font.Bold = False End Select End Sub
There is a different, non-macro way that may make some sense, however. Why not use styles? You can define styles to encompass any formatting attributes desired. For instance, you could define one style that used Times New Roman, and another that used Arial Narrow Bold. You could apply the styles at will, from the toolbar, and you could even search and replace using the styles.
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 (1300) 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: Toggling Font Assignments in a Macro.
Discover the Power of Microsoft Office This beginner-friendly guide reveals the expert tips and strategies you need to skyrocket your productivity and use Office 365 like a pro. Mastering software like Word, Excel, and PowerPoint is essential to be more efficient and advance your career. Simple lessons guide you through every step, providing the knowledge you need to get started. Check out Microsoft Office 365 For Beginners today!
Add-ons can extend the capabilities of Word, sometimes significantly. These extensions are due to macros contained in the ...
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 MoreNeed to remove extraneous characters from a text string? VBA makes it easy through the CleanString method, described in ...
Discover MoreFREE SERVICE: Get tips like this every week in WordTips, a free productivity newsletter. Enter your address and click "Subscribe."
There are currently no comments for this tip. (Be the first to leave your comment—just use the simple form above!)
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.
Visit the WordTips channel on YouTube
FREE SERVICE: Get tips like this every week in WordTips, a free productivity newsletter. Enter your address and click "Subscribe."
Copyright © 2025 Sharon Parq Associates, Inc.
Comments